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STARDEFQZ.SDL = system user interface definitions 
Version: *v04-000' 


PARRA ADARERALALA RARE AAR AR AREAS ESAS ESE SEARLE SERS S ER EER EERE RSE RECESS CCRC EES 


* ® 
* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY ® 
* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * 
: ALL RIGHTS RESERVED. * 
® 

* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
+ NLY IN ACCORDANCE WITH T UCH LICENSE AND WITH THE * 
* INCLUSION OF THE ABOVE eof Te ieue NOTICE. THIS SOFTWARE OR ANY OTHER * 
{* COPIES THEREOF on NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
ts OTHER PERSON. TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
te TRANSFERRED. * 
* *® 
{* He INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
{* SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
te CORPORATION. * 
* *® 
t DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
te SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
® 

GER BR IAG LE S TEN AM ENE CRN IE aE OLE A IE I ARE, 


{++ 
FACILITY: VAX/VMS System Macro Libraries 
ABSTRACT: 


This file contains the SDL source for all user visible operating 
system interfaces from Q to 2. 


ENVIRONMENT: 
n/a 


o~ 


AUTHOR: The VMS Group CREATION DATE: 11-Aug-1976 
MODIFIED BY: 


VO3-072 CwWH3072 CW Hobbs 24-Jul-1984 
Add WS_OPAO stg workstation using QVSS for console. 


v03-071 CDS0001 hristian D. Saether 20-Jul-1984 
Add ACP _DINDXCACHE pe ACP " REBLDSYSD parameters. 


v03-070 ACG0436 Andrew C. Goldstein 12-Jul-1984 12:02 
Add LGI_BRK_ TERM” and LGI_BRK *DISUSER parameters 


4 
| 


end 
end 


AQAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADTAAAAALN 
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v03-067 


v03-066 


v03-065 


Vv03-064 


v03-063 


v03-062 R 


v03-061 


v03-060 WM 


v03-059 


v03-058 


v03-057 MM 


v03-056 


v03-055 
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JAKO218 Krycke 10-Jul-1984 
Add BUFFER COUNT? J E Lb gs QUANTITY item codes to S$SJCDEF. 
Add RESERVED_xxx item and finction codes to $SJCDEF. 
Add RESERVED" xxx item and function codes to SQUIDEF. 


WHMO0001 Bill Matthews 04-May-1984 
Remove USESYSPARAMS getsyi item. 

jencens Erycke 20- 

Add the dei tuated Scet Ue flags: QUIS_FILE P ARC INATE EXP, 
QUIS$_JOB FILE _PAGINATE, QUI$_JOB_FILE—P PAGINAT ATE_EXP, and 
Quis Sedan 

JAK0203 ycka 17-Apr-1984 


Add ACCOUNT NAMES tre, vind USERNAME input iten codes to $SJCDEF 
which correspond to existing output item codes in $QUIDEF. Also 
declare YSER. IDENTIFICATION to be a code reserved for internal 
use by Digital so that it can be retired after all utilities 
have been converted to use the three new item codes. 


MIRO420 Michael I. Rosenblum otét “Apr-1984 
Add syogen parameter tty defport to s eyite ables 
Add readverify picture str definitions to Ser tver 


WHM0001 Bill M 08-Apr-1984 
Replaced SCSNODEL and aE ENODEH wits SCSNODE. 

Replaced DISK_QUORUM1=4 with DISK QUORUM 

Added SYSBOOT parameters USESYSPARAMS con WRITESYSPARAMS 


MEDO069 Ellen M. Dusseault 06-Apr-1984 
Add new terminal danteat s name, LA84, to TIDEF. 
AS0281 Ron Schaefer 28-Mar-1984 
Naa RMS_DFNBC (network block count) GETSYI item. 
JEJ0014 Jed 25-Mar-1984 
Add RMS_GBLBUF QU0 folopat “tutter quota) GETSYI item. 
wMC0060 ne Cardoza 24-Mar-1984 
Add ACP_XOP_RES GEYS¥I item 
wMC0059 Wayne Cardoza 7-Mar-1984 
Add SEC$x_RESIDENT. 
EMDO00SO Ellen M. Dusseault 28-F eb-1984 
Add new terminal aoe. PRO_SERIES, to TIDEF and a 
new terminal characteristic, DEC_ ERT2 to TT2DEF. 


MMD0240 Neg Dumont 24-Feb-1984 10:55 
GETSYI item for LOADMTACCESS. Installation loadable 
mag tape access routine. 


TMK0004 Todd 02-Feb-1984 
Change the name of Svié. PAPORTPOLL to SYl “PRNOPOLL « 


TMKO003 Todd M. Katz 01-Feb-1984 


ses es &® & & & 
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Change the name of SYIS_PAPOLL to SYIS$_PAPORTPOLL. 
v03-054 wMc0054 Wayne Cardoza 31-Jan-1984 
GETSYI items for qnuleted instruction classes. 
v03-053 TMKO002 31-Jan-1984 
Add SYI$_PE1, svIs Seo" éyis ‘Bes, SYIS$S_PE4, svi. PES, SYI$_PE6, and 
SYIS$_PAPOLL to $SVIDEF. 
v03-052 ACG0392 Andrew C. Goldstein, 30-Jan-1984 12:19 
Add UICSK_MATCH_ALL identifier 
v03-051 JLV0326 Jake 11=JAN=1984 
Add TTY_TIMEOUT and YY y AUTOCHAR to SYI definitions. 
v03-050 M1IRO300 Michael I. Rosenblum 10-Jan-1984 


add definition for BITS terminals and make a note 

that the negitive terminal device ape are reserved 

for the RTL foreign terminal suppor 

Move the definition for VT200 out - the negitive range 
| 
| 
| 
| 


v03-049 wMC0048 Wayne Cardoza 01-Jan-1984 
SYIDEF codes for page and swap file data. 
V03-048 LMP0177 . Mark Pilant, 7=Dec-1983 12:29 
Add CLASS_PROT 0 “$SYIDEF to support non-discretionary 
classification eae 
V03-047 SSA0003 Sta wer 5-Dec-1983 
Added DORMANTWAIT to sey] EF to support outswap scheduling 
changes. 
V03-046 DWT0151 David W. Thiel 15-Nov-1983 
Add SYSGEN parameters LOCKDIRWT and QDSKVOTES. 
Undefine VAXCLUSTER bit-field and define VAXCLUSTER 
as a byte. 
v03-045 TMKO001 Tod 26-0c t-1983 


d M. 
Add SYI$_PQL_DJTQUOTA ay S¥I$ PQL_MJTQUOTA to S$SYIDEF. 
These item List codes represent the sysgen parameters 
PQL_DJTQUOTA oad PQL_MJTQUOTA. 


V03-044 KFHOO06 Ken Henderson 19 Sep 1983 
Re-add ALLOCLASS and LGI_ security param 
into S$SYIDEF. They were SYSGEN parameters. 


v03-043 KFHOO0S ender 9 Sep 1983 
Remove SYI$_ SERIAL. "WE EPLANT. OHWREVISION, 
ra tt il and LGI_ security params from 


v03-042 MIROO8S Michael, 1. Rosenblum te -1983 
pom sonere definitions for DCL_OUTBND and DCL_CTRLC 


AAA AAAAAAAAAAAAAAAAAAAAAAAARAAAAARAAAAAARAAAAARARAAARAN 
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v03-041 MLJ0118 Martin L. Jack 25-Aug-1983 


w 
a 
= 
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Update spellings in SSJCDEF and SQUIDEF per d tation, 
add PAGE SETUP® tp Pep sams ur bn 


a public interface. 


{ ‘ 
v03-040 ninoets Michael I. Rosenblum 19-Aug-1983 ; 

Add TT2$V_SYSPWwD to TT2DEF. | ; 

{ VO3-039 MLJ0116 Martin L. Jack 17-Aug-1983 ‘ 
$ Update SUSGDEF for long filenames. . 
{ vO3-038 MLJ0115 rtin L. Jack 30-Jul-1983 ‘ 
{ Update SSJCDEF oa "Saurber” ’ 
¢ V03-037 GAS0162 Gerry Smith 30-Jul-1983 , 
f Add LGI_PWD_TMO to stvIDEF. ‘ 
{ V03-036 RASO179 Ron Schaefer 29-Jul-1983 ; 
¢ Remove LOGXHASHTBL sysgen params from $SYIDEF. . 
{ v03-035 JLv0282 Jake VanNoy 28-JUL-1983 P 
t Remove TRM$_VALUESTR. e 
{ V03-034 KFHO004 n Henderso 28 Jul 1983 ; 
{ Add MAXQUEPRI, DEFQUEPRi QDSKINTERVAL in SSYIDEF. , 
{ Remove JOBQUEUES, REINITQUE PRINTSYMB fron SSYIDEF. , 
{ Change VMS CLUSTER to VAXTLUSTER in SSYIDEF , 
$ Remove <RSB> section from $SYIDEF. s 
{ 03-033 NPK3029 27-Jul-1983 ‘ 
{ Remove PASTRETRY™ * aaa A PARAXPORT. PASANITY “oy $SviDEF. , 
{ VO3-032 MSHO001 ann Hinden 11-Jul-1983 ; 
{ Add SYI$_DISK _QuoRU x and SYS. SCS_EXISTS. ‘ 
{ V03-031 LMPBUILD L. Mark Pilant, 24-Jun-1983 14:48 , 
{ Change comment characters ‘'/*'' to ‘"{'' as SDL doesn't Like the ’ 
: former type outside a module etinttion. ’ 
{ v03-030 GAS0142 Gerry Smith 23-Jun-1983 - 
? Add login eed svi stge and ALLOCLASS, to SYIDEF. . 
{ V03-029 MLJ0114 rtin 22-Jun-1983 ; 
? Add S$QUIDEF and ; «oh stichere items. . 
¢ v03-028 MLJ0113 rtin 26-May-1983 ‘ 
t Change spelling ~ a ay $35 cDEF items. ° 
{ vO3-027 wMc0027 Wayne Cardoza 24-May-1983 ; 
¢ Add execute bit to SECDEF * 
v03-026 M1RO0S1 Michael I. Rosenblum 24-May-1983 ; 

? Add Pasthru bit to TT2DEF. e 
{ v03-025 MLJ0113 Martin L. Jack 21-May-1983 : 
Removed definition of onde queue file format. This is not ° 


uw 
a 
ra 
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VO3-024 KFHO003 Ken Henderson 21 May 1983 
Added cluster, uVAX and JNL items to S$SYIDEF 


v03-023 poles Michael I. Rosenblum 07-May-1983 
Add vT200 support ona Altdispar bit. 


-1983 
Add bit definitions for TRMSV_TM_NOEDIT and TRMSH TM_NORECALL 
to allow the user to specify explicitly inhibit editin 


and command recall. so add bit to enable 4 al editing. 


V03-010 MLJ0106 rtin L. Jack, 01-Mar-1983 
Add SSJCDEF a. gt it a ae 2 to job Aten baselevel. 
v03-009 KFHOOO1 Ken Henderson 15 Feb 1983 


Added all SYSBOOT parameters to S$SYIDEF iy stso. 
defined OLDVERSION, OLDSID, OLDCPU for compat ibility. 


v03-008 M1RO025 Michael I. Rosenblum 03-Feb-1983 


AAAAAARAAAARAAAARAAAAAAAAA AR A AA AAA AAAAAAAAAASAAAASASAAAAA 


vO3~022 EADO0z2 Elliott A. Drayton 1-May-1983 ‘ 
Removed one of two definitions in $SYIDEF cor STARTUP_P3. ’ 

v03-021 RkS0021 RICK SPITZ 29-APR-1983 , 
ADD NEW TERMINAL CHARACTERISTICS , 

vO3-020 MLJ0112 nL. Jac 27-Apr-1983 . 
Update SSJCDEF Poy Fin Ta baselevel. . 

v03-019 PCA1015 Paul C. ansenes topoul os 27-Apr-1983 ‘ 
Add sysgen parameters TAILORED and STARTUP_Pn to S$SYIDEF. ’ 

Add sysgen parameter LOCKIDTBL_MAX for Steve Beckhardt. . 

vO3-018 MLJ0109 Martin L. Jack, 14-Apr-1983 14:14 : 
Update SSJCDEF for job ee aeettas baselevel. ’ 

VO3-017 MIROO31 Michael I. Rosenblum __1-Apr-1983 : 
Add bits to TTDEF to include user specifyed frame : 

size, number or stop bits, and parity handeling ° 

v03-016 MIROO30 Michael I. Rosenblum 29-Mar-1983 ; 
Add modifiers #. ee with verification. é 

v03-015 MIRO Michael I. Rosenblum 25-Mar-1983 : 
Add e ppl ications mode keypad bit. Remove unused e 

EXTED bit from STRMDEF ° 

v03-014 KFHOOO2 Ken Henderson 8 Mar 1983 ; 
Added BOOTTIME to SSYIDEF. a 

v03-013 ROW0167 Ralph 0. Weber 2-MAR-1983 ; 
Add connection manager parameters QUORUM, VOIES, and ° 
RECNXINTERVAL. ° 

VO3-012 MIR1026 Michael I. Rosenblum 01-Mar-1983 : 
Fix typeo in edit MIRO026. . 

vO3-011 MIROO26 Michael I. Rosenblum _01-Mar . 
j 

/ 

/ 

/ 
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Add STRMDEF £9. ot the new bit definitions for the 
item List Q10 


V03-007 DMW SYSTEMBUILD DMWa Lp 25-Jan-1982 
Hardcoded SYISC_SFWIYPE@8 as 256 in SYIDEF to get 
around SDL problem. This pa cket will be removed 


when the SDL problem is fixed! !!!iittiitiitirl re! 


v03-006 MLJ0103 Martin L. dark. 7-Jan-1983 15:50 
Add S$SJCDEF items correspond ng to job controller baselevel. 


PAA AAA AA 


v03-005 ACG0307 rey C. Goldstein, 30-Dec-1982 16:42 
¢ Add UIC format deftin tion 
{ v03-004 ACG0303 Andrew C. Goldstein, 9=Dec-1982 16:06 
¢ Add FILL attribute to extraneous field names 
{ v03-003 MLJ0097 Martin L. Jack, 9-Sep-1982 16:52 
¢ Ada SSJCDEF. 
{ v03-002 mmD0001 Meg Dumont, 5-Apr-1982 14:49 
¢ Add SXWDEF for XWDRIVER 
{ v03-001 RKSO0001 RICK SPITZ 29-MAR-1982 
¢ ADD SPECIAL TT2 CHARACTERISTICS FOR DCL SPAWN 
{---- 
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module SQUIDEF; 

es Get Queue Information Service 

- NOTE: This service and sorreasendtos symbol definitions is pangs sate NOT 
g 


GTH : /LENGTH=n 
FORM_MARGIN_BOTTOM /* Form: /MARGIN=BOTTOM=n 


/ being documented for VM -0 and is suppor ted only for interal Digital 
/* component use. Symbol definitions and the size of strings returned, for 
a example, may change in a subsequent release or update of VMS. Beware! 
/* NOTE: New items must always be added at the end so users will not have to 
/* relink. 
/* Function codes 
constant ( 
CANCEL_OPERATION /* Cancel a wildcard operation 
° DISPLAY_CHARACTERISTIC /* Return characteristic attributes 
° DISPLAY_FILE /* Return file attributes 
° DISPLAY_FORM /* Return form attributes 
° DISPLAY_JOB /* Return job attributes 
‘ DISPLAY_ QUEUE /* Return queue attributes 
‘ TRANSLATE QUEUE /* Validate and translate queue name 
° RESERVED_FUNC_1 /* Reserved for Digital use (name may change) 
RESERVED_FUNC_2 /* Reserved for Digital use (name may change) 
§ equals 1 increment 7 prefix Qui tag $; 
/* Item codes 
constant ( 
ACCOUNT _NAME /* Job: Submitter's account name 
° AF TER_TIME /* Job: /AFTER=time 
. ASSIGRED_QUEUE_NAME /* Queue: ASSIGN/QUEUE target 
° BASE_PRIORITY /* Queue: /BASE_PRIORITY=n 
CHARACTERISTIC_NAME /* Characteristic: Name 
° CHARACTERISTIC NUMBER /* Characteristic: Number 
° CHARACTERISTICS /* Job, queue: /CHARACTERISTICS=(c,...) 
° CHECKPOINT_DATA /* Job: Checkpoint data 
° CLI /* Job: /CLI=filename 
e COMPLETED_BLOCKS /* Job: Completed blocks including checkpoint 
° CONDITION VECTOR /* Job: Completion status 
° CPU_DEFAUCT /* Queue: /CPUDEFAULT=t 
‘ CPU_LIMIT /* Job, queue: /CPUMAXIMUM=t 
. DEVICE _NAME /* Queue: /ON=device 
‘ ENTRY_RUMBER /* Job: Entry number 
° FILE_COPIES /* File: /COPIES=n : 
° FILE_COPIES_CHKPT /* File: File copies checkpoint 
° FILE_COPIES_DONE /* File: File copies completed 
° FILE_FLAGS /* File: Boolean information 
° FILE_SETUP_MODULES /* File: /SETUP=(module,...) | 
; FILE~SPECIFICATION /* File: Full file specification 
: FILE STATUS /* File: Status information 
° FIRST_PAGE /* File: /PAGES=(n 
‘ FORM_DESCRIPTION /* Form: /DESCRIPT{ON=string 
> FORM_FLAGS /* Form: Boolean information 
. FORM_LEN /* Form 
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Form: /MARGIN=LEF T=n 

Form: /MARGIN=RIGHT=n 

Form: /MARGIN=TOP=n 

Form, = Mca Form name 

Form: 

Form: /SETUP=(module,...) 

peras /STOCK=stock-name 

Form: /WIDTH=n 

bususs /GENERL C=(queue-name,...) 

Job: Intervening pending locks 

Job: Prseryenoe pending jobs 

Job: /JOB_COUN 

Job: fob top a “gheckpoitne 

ne Job copies completed 
Boolean infernetion 

aueve:. 74 /JOB_LIMIT= 


Queue: 7 SEPARATE=RESET= (module,...) 
Job: Total blocks in job 

Queve: /BLOCK_LIMIT=n 

Queue: /BLOCK- “CIMIT= oie 

Job: Status information 

File: /PAGES=n 

Susues /LIBRARY=tile-speci fication 
Job: /PRINTER=queue-name 

Job: /LOG FILEstile-specification 
Job: /NOTE=strin ng 

Job: /OPERATOR=string 

Queue: /OWNER=uic 

Form: /PAGE SETUP: (module,...) 

Job: /PARAMETER=string 


Job: /PRIORITY=n 

Queue: /PROCESSOR=filename 
Queue: /PROTECTION=mask 
Queue: Boolean information 
Job, queue: Sueue name 
Queue: Status information 
Job: Reason symbiont refused job 
Job: Priority after requeue 
Job: Queue a ter _requeue 
Queue: /ON=node: 

Flags to control search 
Object name to search for 
Object number to search for 
Job: Submission time 

Job: Submitter's VIC 

Job: Submitter's yserna me 
Job, queue: /WSDEFAULT=n 
Job, queue: Wee arenion 


ST, 
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° WSQUOTA /* Job, queue: tet a 
° RESERVED_BOOLEAN_1 /* Reserved for D gital use (name may change) 
. RESERVED BOOLEAN_2 /* Reserved for Digital use (name may change) 
° RESERVED_INPUT_1 /* Reserved for Digital use (name may change) 
° RESERVED_INPUT_2 /* Reserved for Digital use (name may change) 
° RESERVED_OUTPUT_1 /* Reserved for Digital use (name may change) 
° RESERVED OUTPUT ¢ /* Reserved for Digital use (name may change) 
° RESERVED _OUTPUT_ /* Reserved for Digital use (name may change) 
° RESERVED _OUTPUT_4 /* Reserved for Digital use (name may change) 
° RESERVED _OUTPUT_5 /* Reserved for Digital use (name may change) 

RESERVED_OUTPUT_6 /* Reserved for Digital use (name may change) 
j equals increment 1 prefix QUI tag $; 
~ Structure of FILE_FLAGS item. 
aggregate FILE FLAGS structure fill prefix QuI$; 

FILE_BORST bitfield mask; /* jeurs? 

FILE- =puRst EXP bitfield mask; /* /CNOJBURST explicit 

FILE-DEL bitfield mask; /* /DELETE 

FILE “DOUBLE SPACE bitfield mask; /* /SPACE 

FILE_FLAG bitfield mask; /* /ELAG 

FILE “FLAG EXP bitfield mask; /* /CNOJFLAG explicit 

FILE_TRAICER bitfield mask; /* /TRAILER 

FILE-TRAILER_EXP bitfield mask; /* /CNOJTRAILER explicit 

FILE_PAGE HEADER bitfield mask; /* /HEADER 

FILE_PA yt tg bitfield mask; /* /FEED 

FILE-PASSAL bitfield mask; /* /PASSALL 

FILE-PA AGINATE EXP bitfield mask; /* /CNOJFEED explicit 

filler bitfield Length 32-* fill; 
rae 
Structure of FILE_STATUS item. 
aggregate FILE STATUS proucture fill prefix QUIS; 

FILE b-CRECKPOIN TED bitfield mask; /* File checkpointed 

FILE-EXECUT ING bitfield mask; /* File currently executing 

filler. bitfield Length 32-* fill; 
ras 
Ae Structure of FORM_FLAGS item. 
® 
aggregate FORM FLAGS structure fill prefix QUIS; 

_SREET_FEED bitfield mask; /* /SHEET_FEED 

FORM~ TRUNCATE bitfield mask; /* /TRUNCATE 

F ORM_WRAP bitfield mask; /* /WRAP 

filler bitfield length 32-* fill; 


end; 
/t 
a Structure of JOB_FLAGS item. 


aggregate JOB_FLAGS structure fill prefix Qul$; 
JOB_CPU_LIMIT bitfield mask; /* 
JOB" F ILE_BURST bitfield mask; /* / 
JOB_F ILE_BURST_ONE bitfield mask; /* 
JOB_FILE_BURST_EXP bitfield mask; /* 
JOB_FILE_FLA bitfield mask; /* / 


Ad la papite rs 


i o}euRst explicit 


STs 


enc 
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JOB_FILE_FLAG_ONE bitfield mask; /* Ae hy ONE 
Joab ILE AELAG EXP bitfield mask; /* /CNO ie G geet tate 
JOB-FILE-TRAICER bitfield mask; /* /TRAILER=ALL 
JOB_FILE_TRAILER_ONE bitfield mask; /* As NE 
JOB_FILE TRAILER_EXP bitfield mask; /* /CNOJTRAILER explicit 
JOB"LOG_BELETE bitfield mask; /* reer e 
JOB_LOG_NULL bitfield mask; /* /NOLOG FILE 
JOB-LOG™ SPOOL bitfield mask; /* /PRINTE 
JOB-LOWERCASE bitfield mask; /* /LOWERCASE 
JOB-NOTIFY bitfield mask; /* /NOTIFY 
JOB_RESTART bitfield mask; /* /RESTART 
JOB_WSDEF AULT bitfield mask; /* /WSDEFAULT exp) ig ie 
JOB_WSEXTENT bitfield mask; /* /WSEXTENT explicit 
JOB_WSQUOTA bitfield mask; /* /WSQUOTA explicit 
JOB_FILE_PAGINATE bitfield mask; /* /FEED 
JOB"FILE-PAGINATE_EXP bitfield mask; /* /CNOJFEED explicit 
filler bitfield length 32-* fill; 

re 

. Structure of JOB_STATUS item. 

aggregate JOB STATUS structure fill prefix QuI$; 
JOB_ABORT ING bitfield mask; /* Job is abort ing 
JOB" EXECUTING bitfield mask; /* Job is execu ng 

~HOLDING bitfield mask; /* Job is fatding or /HOLD 
308- INACCESSIBLE bitfield mask; /* Job is inaccessible 
JOB-REFUSED bitfield mask; /* Job was refused by symbiont 
JOB_REQUEU bitfield mask; /* Job will requeue after abort 
OB_RESTARTING bitfield mask; /* Job started execution at least once 
JOB_RETAINED bitfield mask; /* Job was cote saes by /RETAIN 
JOB_STARTING bitfield mask; Job is starting 
TIMED bitfield mask; Job is holding for /AFTER 

filler bitfield Length 43-8 fill; 


> 
. Structure of QUEUE_FLAGS item. 


aggregate QUEUE * Aes structure fill prefix QUIS; 
QUEU bitfield mask; /* /BATCH 
QUEUE- CPU_ DEFAULT bitfield mask; /* /CPUDEFAULT specified 
QUEUE" CPU-LIMIT bitfield mask; /* /CPUMAXIMUM specified 
QUEU “FILES RST bitfield mask; /* /DEFAULT=BURST=ALL 
QUEUE _F ILE_BURST_ONE bitfield mask; /* /DEFAULT=BURST=ONE 
QUEUE _FILE_FLAG bitfield mask; /* /DEFAULT=FLAG=ALL 
QUEUE _FILE_FLAG_ ONE bitfield mask; /* /DEFAULT=FLAG=0N 
rt a AITER bitfield mask; /* /DEFAULT=TRAILER=ALL 
QUEVE_FILE_TRAILER_ONE bitfield mask; /* /DEFAULT=TRAILER=ONE 
QUEUE - GENERIC bitfield mask; /* /GENERIC 
QUEVE_GENERIC_SELECTION bitfield mask; /* /ENABLE_GENERIC 
QUEVE~ JOB_BURST bitfield mask; /* /SEPARATE=BURST 
QUEUE _JOB_FLAG bitfield mask; /* /SEPARATE=FLAG 
QUEUE _JOB_SIZE_ SCHED bitfield mask; /* /SCHEDULE=SIZE 
ouES ~ JOB" TRAICER bitfield mask; /* ‘aaiekhe 
QUEUE" RETAIN_ALL bitfield mask; /* /RETAIN= 
QUEUE"RETAIN_ERROR bitfield mask; /* TRETAINZERR 
QUEUE - SWAP bitfield mask; /* /NODISABLE ROUAPPING 
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QUEUE _WS 
QUEUE “WSQUOTA 

QUEUE ~FILE_PAGINATE 
filler 


end; 
/* 


Ly 
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bitfield mask; /* /TERMINAL or terminal device 
bitfield mask; /* /WSDEFAULT specifie 

bitfield mask; /* /WSEXTENT spec fied 

bitfield mask; /* /WSQUOTA ppec fied 

bitfield mask; /* /DEFAULT=FEED 

bitfield length 32-* fill; 


a Structure of QUEVE_STATUS item. 


aggregate QUEVE_STATUS structure 
QUEUE _ACIGNING 


QUEU 


LOWERCASE 
QUEUE OPERATOR REQUEST 


QUEUE 


@ 
end; 


/t 

ae Definition of SEARCH_FLAGS 

e 

aggregate SEARCH FLAGS structure 
SEARCH_ALL_ JOBS 
SEARCH_WILBCARD 
SEARCH_BATCH 
SEARCH_SYMBIONT 
filler 


end; 


end_module SQUIDEF; 


TE 
QUEUE "RESETTING 
E UMING 


E 
QUEVE- STOPPING 
QUEUE UNAVAILABLE 
r 


pipe QuIS$; 

d mask; /* Queve is aligning 

ld mask; /* Queue is idle 

ld mask; /* Lowercase device 

ld mask; /* Queue is doing /OPERATOR 
ld mask; /* Queue is paused 

ld mask; /* Queue is pausing 

tg mask; /* Remote device 
l 
l 
l 
l 
l 
l 
l 
l 


d mask; /* Queue is resuming 
d mask; /* Server symbiont 

d mask; /* Device is stalled 
d mask; /* Queue is starting 
d mask; /* Queue is stopped 
d mask; /* Queue is stoppin 
d mask; /* Device is unavailable 
d length 32-* : 


cocococccccccccocCcSo 
ate ate eas ae ee ae hs le ee he es ele be lle eg lw ty 
errr rt etc ct ct + 


fill; 


refix QUI$; 


ld mask; /* Force a wildcard operation 
d mask; /* Select batch queues 

mask; /* Select symbiont queues 
d length 32=* fill; 


d mask; /* Incomplete remote request to reset 


mask; /* Select all jobs (else only requesting user's) 


K 14 
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module SSBKDEF; 
/v+ 


/* 
/* Statistics block. This block is used to report various data regarding 
. an open file to the requesting program. 


/t- 


/* 
/* The first two senqyeree are presented in inverted form for compatibility 
; with the old RSX-11 statistics block. 


aggregate SBKDEF structure prefix SBK$; 
STLBN_OVERLAY union fill; 


STLBN lLongword unsigned; /* starting LBN if contiguous 
STLBN_FIECDS structure fill; 
STLBNH word unsigned; /* high order word 
STLBNL word unsigned; /* low order word 
end STLBN_FIELDS; 
end STLBN_OVERLAY; 
FILESIZE_ OVERLAY union fill; 
FILESIZE longword unsigned; /* file size 
FILESIZE_ FIELDS structure fill; 
FILESIZK word unsigned; /* high order word 
FILESIZL word unsigned; /* low order word 


/t 
. The following two fields are for RSX-11 compatibility 


end FILESIZE FIELDS; 
end FILESIZE_OVERLAY; 


ACNT byte unsigned; /* low byte of access count 

LCNT byte unsigned; /* Low byte of lock count 

FCB lLongword unsigned; /* address of file control block 
FILL_1 word fill prefix SBKDEF tag $$; /* spare 

ACNT word unsigned; /* access count E 

LCNT word unsigned; /* lock count (against writers) 

WCNT word unsigned; /* writer count 

TCNT word unsigned; /* truncate lock count 

READS Longword unsigned; /* count of reads executed on channel 
WRITES Longword unsigned /* count of writes executed on channel 


ed; 
constant ‘LENGTH’ equals . prefix SBK$ tag K; 
constant "LENGTH" equals . prefix SBK$ tag C; 


end SBKDEF ; 
end_module S$SBKDEF ; 


STARDEFQZ.SDL;1 


wodule SSECDEF; 
a PROCESS OR GLOBAL SECTION DEFINITIONS 


/t 


/* wearer | VBN 
is ater EQUIVALERTLY NAMED BFFSET N $PFLDEF 


a09r 88a Sy SECDEF syructure prefix SECS; 
GSD" Lon union f 
ongword Be Sets 
S oneeere unsigned; 
end §$ OV 
SECXFL word + Sa 
SECXBL word unsigned; 
valent * 2 ge pa uiea’ fill; 
enguore unsigned 
VPXPEE Bit etrucfure tilt; 
VPX bitfield | 


bit 
PFC Bitfield Length 8; 

end VPXPFC_ BITS; 

veuPre FIECDS structure fil 


ICL_S5 byte dimension 5' HLL prefix SECDEF tags 


PFC byte unsigned; 
FIELDS; 


ae ps Longword . ned; 


HE 
etd "fenath’ 2 fill prefix SECDEF a 


x34 
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L_ WINDOW, AND B oy BE THE SAME OFFSET VALUES AS THE 


/*GLOBAL SECTION DESCRIPTOR ADDRESS 
/*CHANNEL CONTROL BLOCK ADDRESS IF 


/*SECTION INDEX FORWARD LINK 
/*SECTION INDEX BACKWARD LINK 


/*START VIRT PAGE INDEX & PFC 
/* STARTING V VIRTUAL PAGE INDEX 
Paci FAULT CLUSTER 


PROCESS SECTION 


Mack FAULT CLUSTER 


/*WINDOW CONTROL BLOCK 


“OUERLA uns /*BASE VIRTUAL BLOCK NUMBER 
FLAGS 0 ERLAY catie Fit: 
word unsigned; /*VARIOUS CONTROL FLAGS 
pres BITS structure fill; 
GBL bitfield mask; /* GLOBAL SECTION 
CRF bitfield mask: /* COPY oh REFERENCE 
DZRO bitfield mask; /* DEMAND ZERO 
WRT bitfield mask; /* WRITABLE 
SHMGS bitfield mask; /* SHARED MEMORY GLOBAL SECTION 
FILL 2 bitfield marti refix SECDEF tag $$; /* SPA 
WRTMOD bitfield mask len th 2; /* WRITE ACCESS MODE FOR SECTION 
AMOD gittieid, mask Leng of /* ACCESS MODE OF SECTION 
FILL_3 bitfield Length ett prefix SECDEF tag $$;/* SPAR 
RESIDENT bittie eld mask; /* RESIDEN L 
PERM bitfield mask; J+ PERMANENT SECTION 
2 SYSGBL bitfield mask; * 1 = SYSTEM GLOBAL, 0 = GROUP GLOBAL 
/* eeeee THE FOLLOWING FLAGS ARE INDICATORS FOR SNGBL SC AND SCRMPSC SYSTEM 
is eeeee SERVICE REQUESTS AND ARE NOT STORED IN THE FLAGS WORD FIELD. 
FNMAP bitfield mask; /* MAP TO SPECIFIC PEN'S 
EXPREG bitfield mask: /* MAP INTO FIRST FREE ADDRESS SPACE 
PROTECT bittield mask; /* CHECK WRITE ACCESS MODE (WRTMOD) 
PAGFIL bitfield mask /* GLOBAL SECTION HAS PAGE FILE BACKING STORE 
EXECUTE bitfield mask: /* CHECK FOR EXECUTE ACCESS 
end FLAGS_BITS; 


——— 


$v 


M14 
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end FLAGS_OVERLAY; 
end SECDEF; 


aah jt SECDEF1 stru —s prefix SEC$; 
byte dimension 21 fill pretix SECDEF tag $$; 


D byte uns jgne ed; peaccess MODE OF SECTION 

Ate 4 word fill prefix SECDEF tag $$; /*SPA 

REFCAT Longword unsigned; 7SCOUNT OF PTE'S RErERENC! NG THIS SECTION 
Pe PAGCNT lLongword unsigned; /*NO. OF PAGES IN THE SECTION 
. tee NOTE THAT NUMBER OF LONG WORDS MUST BE EVEN 
® 

constant ‘LENGTH’ equals . prefix SEC$ tag K /*SIZE OF PSTE/GSTE 

constant "LENGTH" equals . prefix SEC$ tag C: /*SIZE OF PSTE/GSTE 


{ee 
* MATCH CONTROL VIELD VALUES 


/* BASE OF ZERO , INCR 1 


constant ( 
MATALL /* MATCH ALWAYS, USE GLOBAL SECTION 
, MATEQU /* MATCH IF ISD$L_IDENT EQU GBL ID 
MATLEQ /* nATeH IF ISDSLTIDENT LEQ GBL ID 


j equals 0 increment 1 prefix SEC tag $k; 


end SECDEF1; 
end_module S$SECDEF; 
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module $SSJCDEF; 


/* 
/* 
/* 
/* 


/* 


constant ( 

ABORT_JOB /* 
° ADD_FILE /* 
° ALTER_J /* 
° ALTER QUEUE /* 
° ASSIGN_QUEUE ® 
. BATCH_CHECKPOINT /* 
° BATCH_SERVIC * 
° CLOSE_DELETE /* 
° CLOSE_ JOB /* 
° ATE_JOB /* 
° CREATE _QUEU /* 
, DEASSIGN QUEUE /* 
° DEFINE_CRARACTERISTIC /* 
° DEF INE_FORM /* 
° DELETE_CHARACTERISTIC /* 
° DELETE_FORM /* 
. DELETE_J /* 
° DELETE QUEUE /* 
: FIL /* 
° MERGE _QUEUE /* 
° PAUSE _QUEUE /* 
° RESET_QUEUE /* 
° START_ACCOUNT ING /* 
. START_QUEUE /* 
° START _QUEUE MANAGER /* 
° STOP_ACCOUNTING /* 
° STOP_QUEUE /* 
° STOP _ QUEUE MANAGER /* 
. SYNCRRONIZE JOB * 
° WRITE ACCOUNTING /* 
° RESERVED_FUNC_1 /* 
e RESERVED_FUNC_ 2 /* 
) equals 1 increment T prefix SJC t 
/* Item codes 
constant ( 

ACCOUNT ING_MESSAGE /* 
° ACCOUNTING_TYPES /* 
° AFTER_TIME /* 
° NO_AFTER TIME 
. ALTGNMENT_MASK /* 
° ALIGNMENT PAGES /* 
° BASE_PRIORITY ~ 
e ae 


Send to Job Controller Service 


NOTE: New items must always be 
relink. 


Function codes 


N \ 
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added at the end so users will not have to 


Abort current job in a queue 

Add a file to an open job 

Alter parameters of a job 

Alter parameters of a queue 

Assign a logical queue to an execution queue 
Establish a checkpoint in a batch job 
LOGINOUT communication 

Close and delete an open job 

Close and enqueue an open job 

Create an open job 

Create a queue 

Deassign a logical queue 

Create a characteristic definition 
Create a form definition 

Delete a characteristic definition 
Delete a form definition 

Delete a job 

Delete a gueuve , 

Enter a single file job in a queue 
Requeuve all jobs in one queue to another 
Suspend processing from a queue 

Reset a queue 

Start accounting manager 

Start processing from a queue 

Start system job queue manager 

Stop accounting manager 

Stop processing from a queue 

Stop system job queue manager 
Synchronize with job completion 

Write user accounting recor 

Reserved for Digital use (name may change) 
Reaerved for Digital use (name may change) 
ag $; 


User agcounting message 
Mask of accounting record types 
Hold until time 


Mask alignment data 

Number of alignment pages 
Batch process base priority 
Batch queue 
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NO_BATCH 
BATCH_INPUT 
TCH-OUTPU 


T 
TI 
Tl 
al 
OINT_DA 
NO CHECKPOINT 


ATA 


L E 

NO. DELETE FILE 

DESTINATION_QUEUE 
CE_NAME 


DOUBLET SPACE 
NO_ DOUBLE SPACE 


“FLAG 
F 


TLE_FCAG 
IDENTIFICATION 

SETUP_MODULES 
TLE_SETUP_MODULES 
SPECIFICATION 
“TRAIL 
TL 

GE 

IRST_PAGE 
_DESCRIPTION 


TH 
“MARGIN_BOTTOM 
MARGIN-LEFT 


nn 
S5—5 
a) 
MPa Ba aa a a hPa a a 
fod 


233 
zz 


ssoseesss 


ve 

FORM_SHEET_FEED 
$ CK 

OR 


9595 
=m 
ao 
m 
“ 
c 
“mo 
¥ 
moo 
So 
Cc 
nt 
m 
“ 


RUNCATE 


“WRAP 
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LOGINOUT communication 
Printer characteristic 


Batch checkpoint string 
Batch process CLI 
Default CPU time Limit 
Maximum CPU time Limit 


Start queue after creation 
Delete file after processing 


Destination queue name 
Output device name 
Double space output 


Job entry number 
Print file burst page 


Print n copies of file 
Print file flag page 


DVI, FID, DID of file 
Device control modules for file 


File specification of file 
Print file trailer page 


Starting page number 


Textual description of form 
Form Length in Lines 

Form bottom margin in Lines 
Form left margin in characters 
Form right margin in characters 
Form top margin in Lines 
Printer form 


Device control modules for form 
Form is sheet fed 


Stock name for form 
Truncate long Lines 


Form width in characters 
Wrap long Lines 


16 


| 


ST 
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F 
I 
ESET_MODULES 
RESET_MODULES 
E MAXTMUM 


D 
NO_COG_ DELETE 


LOG SPECIFICATION 
NO_COG_ SPECIFICATION 
SP60 


L 
0G_SPOOL 
LOQERCASE 
NO_LOWERCASE 
NEQ_VERSION 
NEXT_JOB 
NOTE 


NO_NOTE 
NOTIFY 


NO_NOTIFY 
OPERATOR_REQUEST 
NO OPERATOR_REQUEST 


ER_U 
PAGE READER 
NO_PAGE HEADER 
PAGE _SET 


UP_MODULES 
NO_PAGE_SETUP_MODULES 
PAGINATE 


NO_PAGINATE 
PARAMETER_1 
PARAMETER™2 


5 
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Queue is a generic queue 


Queue can take work from generic queue 
Possible execution queue for generic queue 


Place job on hold 
Print job burst page 


Print n copies of entire job 
Print job flag page 


Number of concurrent jobs 
Identifying name of job 

Device control modules between jobs 
Largest job accepted by printer 
Smallest job accepted by printer 
Schedule printer queues by size 


Status message for submitted job 
Print job trailer page 


Ending page number 


* Filename of device control Library 
* Delete log file 


Log file's print queue 
File specification of log file 


Print log file 

Print on lowercase printer 
Create new version of file 
Resume at next job 

Flag page note text 

Notify user on completion 
Operator service text 


Queue owner UIC 
Print page headers 


Device control modules for form page 
Paginate output with free form feeds 
Batch job parameters 
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equals 1 increment 
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PARAMETER_3 
PARAMETER_4 
PARAMETER_5 

pep de 

RAMETER_ 
PARAMETER 8 
NO_PARAMETERS 

SSALL /* Print file passall 

PASSALL 

PRIORITY /* Job scheduling priority 
PROCESSOR /* Filename of symbiont image 
NO_PROCESSOR 
PROTECTION /* Queue protection mask 
QUEUE /* Queue on which to operate 
QUEUE _FILE_ SPECIFICATION /* File specification of queue file 
RELATIVE_PAGE /* Resume after forward or back space 
REQUEUE /* Requeue job 
RESTART /* Job can restart 
NO_RESTART 
RETAIN_ALL_JOBS /* Retain completed jobs 
RETAIN ERROR_JOBS 
NO_RETAIN_ JOBS 
SCSNODE E /* Node name of execution node 
SEARCH_STRING /* Resume after finding string 
-y* /* Swap batch processes 
bg /* Queue is a (generic) terminal queue 
TOP_OF FILE /* Resume at top of file 
USER_IBENTIFICATION /* Prony user identification (reserved for Digital use only) 
WSDEFAULT /* Working set default 
NO_WSDEF AULT 
WSEXTENT /* Working set extent 
NO_WSEXTENT 
WSQGUOTA /* Working set quota 
NO_WSQUOTA 
ACTOUNT_NAME /* Proxy account name (requires CMKRNL privilege) 
VIC /* Proxy UIC (requires CMKRNL prcet ee 
USERNAME /* are username (requires CMKRNL privilege) 
BUFFER_C /* Multibuffer count for queue file 
EXTEND QUANTITY /* Allocation and extend quantity for queue file 
RESERVED_BOOLEAN_1 /* Reserved for Digital use (name may change) 
RESERVED_BOOLEAN_ /* Reserved for Digital use (name may change) 
RESERVED_BOOLEAN_ /* Reserved for Digital use (name may change) 
RESERVED _BOOLEAN_ /* Reserved for Digital use (name may change) 
RESERVED_INPUT_1 /* Reserved for Digital use (name may change) 
Re eEnvESoimpur-8 /* Reserved for Digital use (name may change) 
RESERVED_INPUT_ /* Reserved for Digital use (name may change) 
RESERVED_INPUT_4 /* Reserved for Digital use (name may change) 
RESERVED_OUTPUT_1 /* Reserved for Digital use (name may change) 
RESERVED_OUTPUT_2 /* Reserved for Digital use (name may change) 


® 
prefix SuC t 


ag $; 


tructure of ACCOUNTING_TYPES item. These definitions must track 
XESGL_ACMFLAGS. 
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/* 

aggregate ACCOUNTING ad = shruct ure fill prefix SJCS$; 
ACCT_PROCESS bitfield mask; /* Process termination 
ACCT_IMAGE bitfield mask: is Image termination 
ACCT_INTERACTIVE bitfield mask; /* Interactive erecesees 
ACCT_LOGIN FAILURE bitfield mask; /* Login failure 
ACCT_SUBPROCESS bitfield mask; /* Subprocesses 
ACCT_DETACHED bitfield mask; /* Detached processes 
ACCT_BATCH bitfield mask; /* Batch processes 
ACCT_NETWORK bitfield mask; /* iy rocesses 
ACCT_PRINT bitfield mask; a Print job termination 
ACCT_MESSAGE bitfield mask; /* User messages 

P ACCT_UNUSED bitfield Length $5.5 ; 
end; 


end_module SSJCDEF; 
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module SSMRDEF ; 


DEFINE SYMBIONT MANAGER REQUEST CODES 


constan 


v0 
r>omae 


ee eee eee eeseese eee 
o 
PJ 
m 
a 


wee 


equals 0 increment 1 


prefix SMR tag SK; 


F 
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/t 
a ASSIGN SYMBIONT MANAGER PRINT JOB/RECORD OPTION CODES 


/t 
constant ( 
DE 


~e © ee 8 & & & S&S & & 


equals 1 increment 1 
constant ( 

RLSTIM 

HOLD 

JOBPRI 

JOBCOPY 

FORMTYPE 

LOWER 


ese 8 8 8& 


prefix SMO tag SK; 


SYMBIONT MANAGER REQUEST CODES 


peers A QUEUE 
DELETE THE QUEUE 
ACTIVATE OR 2 eh te on kunt 


SUSPEND PRINTING F WHILE 

MOVE FILES FORM ONE "aueUe INTO ANOTHER 

ASSIGNMENT OF ONE QUEUE TO ANOTHER 

JUSTIFY PRINT FORMS(IE: ISSUE FF) 

DISABLE FURTHER DE-QUEING 

ADD A FILE TO_A QUE 

CREATE A PRINT JOB 

ADD A FILE TO EXISTING JOB 

CLOSE OPEN JOB 

REMOVE JOB FROM QUEUE 

CHANGE A FILES CHARACTERISTICS 

ABORT CURRENT JOB, START NEXT 

RELEASE JOB FROM HOLD LIST 
ETACHED JOB HAS INITIATED 
ted Be WITH A BATCH JOB 

GET NAME OF QUEUE FOR LOG FILE 


JOB FILE OPTIONS 
DELETE * fie saa PRINTING 
A_BURST PAGE 


OPTIONS FOR CREATE JOB 


TIME ye HOLD UNTIL QUEUEING 
HOLD THE JOB 

SPECIFY PRINT Joe (oe TAciee JOB PRIOITY 
NUMBER OF $o° Nt: OF ENTIRE JOB 

FORM TYPE TO USED WHEN PRINTED 
UPPER/LOWER CASE PRINTER ONLY 


Ag 


en 
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» PARAMS /* 
° JOBNAME /* 
- NOLOWER /* 
- CPULIM /* 
- NOCPULM /* 
» WSQUOTA /* 
° $Qu0 /* 
» WSDEFLT /* 
° SDF /* 
- DQCHAR /* 
- LOGFNAM /* 
» LOGQNAM /* 
- KEEPLOG /* 
 NOSPOOL /* 
- NOKEEPLOG /* 
° LOG /t 
» NOTIFY /* 
. TF /* 
» WSEXTNT /* 
NOWSEXTNT /* 

j equals 32 increment 1 prefix SMO tag $K; 
/* 

constant ( 

CURFORM /* 
» GENPRT /* 
« NOGENPRT /* 
- DETJOB /* 
- GENDEV /* 
° ENDEV /* 
. DEFBRST /* 
° EFBR /* 
» DEFFLAG /* 
» NODEFFLAG /* 
. TRMDEV /* 
» NOTRMDEV /* 
- JOBLIM /* 
~ INIPRI /* 
- DISWAP /* 
» MCPULM /* 
- NOMCPULM /* 
- DCPULM /* 
° CPUL /* 
» WSQUTA /* 
« NOWSQUTA /* 
« WSOFLT /* 
« NOWSDFLT /* 
« CURDQCHAR a 
e ¥ 
« WSXTANT /* 
» NOWSXTNT /* 
NOD I SWAP /* 

§ equals 64 increment 1 prefix SMO tag SK; 
/t 


constant ( 


SUPPLY JOB PARAMETERS 
SUPPLY A NAME TO THE JOB 
CLEAR LOWER CASE REQUIRED 
CPU TIME LIMIT 

O CPU TIME LIMIT 

WORKING SET QUOTA 

O WORKING SET QUOTA 
WORKING SET DEFAULT 

O WORKING SET DEFAULT 
CHAR. TO BE USED WHEN PRINTED 
LOG FILE SPEC. 

QUEUE NAME FOR LOG FILE 
KEEP LOG FILE 

DON'T SPOOL LOG FILE 
DELETE LOG FILE 

CREATE LOG ON NULL DEVICE 
NOTIFY WHEN JOB COMPLETES 
NO NOTIFY 

WS EXTENT 

NO WS EXTENT 


OPTIONS FOR INIT OR START A QUEUE 
CURRENT FORMS 5 pel | lg DEVICE 


0 
UEVE IS ig DEVICE QUEUE 
NOT A ge IC DEVICE 
QUEUE HAS — PAGE BY DEFAULT 
NO DEFAULT BURST PAGE 
QUEUE — FLAG PAGE BY DEFAULT 


NO DEFAULT FLAG 

DEVICE IS A_ TERMINAL 

DEVICE 1S NOT A TERMINAL 

JOB LIMIT FOR BATCH JO 

JOB INITIAL PRIORITY 

DISABLE SWAPING 

MAX CPU TIME LIMIT 

NO MAX CPU TIME LIMIT 

DEFAULT CPU TIME LIMIT 
DEFAULT CPU TIME LIMIT 

WORKING SET QUOTA 
WORKING SET QUOTA 
RKING SET Saher pay 

NO WORKING SET DEFAU 


WORK 
CURRENT CHAR. OF THE QUEUE 
SYMBIONT NAME FOR QUEUE 


NO WS EXTENT 
ENABLE SWAPPING 


OPTIONS FOR RESTART 


ST 


H 
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NEXT JOB /* RESTART AT END BEGINNING OF NEXT JOB 
- TOPOFILE /* RESTART JOB AT_TOP-OF-FILE 
/* SPECIFY PAGES TO SPACE OVER 


NT 
j equals 96 increment 1 prefix SMO tag $K; 
/* OPTIONS FOR ABORT 
constant ( 
REQUEUE . REQUEUE THE FI 


LE 
* SPECIFY NEW QUEUE DESTINATION 
/* SPECIFY PRIORITY ON REQUEUE 


end_module SSMRDEF ; 


5 
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Sane SSTSDEF; 
~ MACROS TO DEFINE SYSTEM SERVICE FAILURE AND STATUS CODES. 


: SSTRUCT SS 
/* THIS STRUCTURE IS NOW CONTAINED IN ‘SSMSG.MDL' 
{e+ 
/* Define 32-bit VAX-11 error code Longwece lelgs 
6- Socrs - CHAN 


/* Changed to agree with Handbook - EM 189 P 1 
-. Changed to agree with new status value W. H. Brown 1 Eovet 7 


onerepate STSDEF union prefix STS$; 
F_ BITSO structure fill; 
SEVER ERITY bitfield mask Length 3; /* severity code 
OND_ID bitfield mask length 25; /* condition id 
CONT TROL bitfield mask Length 4; /* control bits 

end STSDEF_BITSO; 

STSDEF_BITS1 structu ure a 
SUCCESS bitfield * Suc 
FILL_1 bitfield “Length 2 hy spretin STSDEF tag $$; je skip severity field 
MSG_NO bitfield mask Length 13; /* Message number 

end STSBEF_B1I7S1; 

STSDEF _BITS2 structu 
FICL_2 bitfield S. th 4 fill prefix STSDEF tag $$:/* Skip severity field 
CODE bitfield mask length 12; code 
FAC_SP bitfield mask; «| if facility specific 
FILC_3 bitfield Tength 11 fill prefix STSDEF tag, ‘38; 
CUST_DEF bitfield aaa 1 if sub-system is customer (or CSS) defined 
INHIB_MSG bitfield m 1 if message should not be printed 
FILL_% bitfield Length § fill prefix STSDEF tag $$; /* reserved control bits 

end STSDEF_BITS2; 

STSDEF _BITS3 structure 
FICL 5 bitfield lon ength ie ‘ig Ry S prefix STSDEF tag $$; /* Skip message nubmer field 
FAC_RO bitfield ma acility is 12 bits 
FILC_6 bitfield Length 4° fill prefix STSDEF tag $$; ye Control bits 

end STSDEF_BITS3; 


Jet 
‘ Define severity codes 


constant WARNING equals 9 prefix STS tag $K; /* WARNING 

constant SUCCESS equals prefix STS tag $K; /* SUCCESSFUL COMPLETION 
constant ERROR equals § prefix STS tag $K; /* ERROR 

constant INFO equals prefix STS tag $K; /* INFORMATION 

constant SEVERE equals 4 prefix STS tag SK; /* SEVERE ERROR 
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end STSDEF; 
end_module $SSTSDEF; 
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st 


en 


$3 
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godule SSYIDEF; 
oe Get System Information Data Identifier Definitions 
/e xeee NOTE sae 


/* 
/* New items must aiuay? be added to the END of each item List 
/* (preceeding the ENDListname item) so that users will not have 
/* to relink. 
/t- 
/* DEFINE TABLE TYPES 
constant EXETYPE equals 1 prefix SYI tag $C; /* Executive cells 
constant FLDTYPE equals ¢ prefix SYI tag $C; /* Sub-field data 
constant RSDTYPE equals prefix SYI tag $C; /* Reduced system data 
/* The following item-codes are for executive data cells. 
/* Processor registers are a special case of this type. 
/* Some EXE-type cells have frequently used sub-fields 
/* which have item-codes in the FLD section. (after this one) 
constant ( 
VERSION /* VMS version number 
- $ID /* System ID register 
- PFCDEFAULT /* Default page fault cluster size 
- PAGTBLPFC /* Default page table page fault cluster 
» SYSPFC /* Page fault cluster for eyetes paging 
- KFILSTCNT /* Number of known file Lists 
- GBLSECTIONS /* Global section count 
- GBLPAGES /* Global page count - 
- GBLPAGF IL /* Global page page file page Limit 
» MAXPROCESSCNT /* Maximum process count 
° /* Process scan count 
- PROCSECTCNT /* Process section count. 
- MINWSCNT /* Minimum working set size 
- PAGFILCNT /* Number of paging files 
» SWPFILCNT /* Number of swap files 
- SYSMUCNT /* System working set count 
- INTSTKPAGES /* Interrupt stack size 
- DLCKEXTRASTK /* Extra int stack for deadlock searches 
- BALSETCNT /* Balance set count 
- IRPCOUNT /* rquae of 1/0 pagnets 
- IRPCOUNTV /* Limit of extension of IRP List 
« WSMAX /* Max size of prosens working set 
» NPAGEDYN /* Non=-paged dynamic pool 
- NPAGEVIR /* Limit of extension of above 
- PAGEDYN /* Paged dynamic pool 
» VIRTUALPAGECNT /* Max virtual page count 
- SPTREQ /* Requested SP extens ton 
- EXUSRSTK /* Extra user stack provided 
- LRPCOUNT /* myaper 9 large request gerhets 
» LRPCOUNTV /* Limit extension of LRP List 
- LRPSIZE /* Size of large request packet 
. LRPMIN /* Min alloc request for LRPs 
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SRPCOUNT 
SRPCOUNTV 
SRPSIZE 


N 
CHANNEL CNT 
PIOPAG 


SWPOUTPGCNT 
SWPALLOCINC 
OTA 


U 
EXTRACPU 


BORR ” 
LOCKRETRY 
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ayer of small request packets 
Limit of extension of SRP List 
Size of small request Racket 

Min alloc request for SRPs 

Number of permanent 1/0 channels 
Process I/ pages 

Control region impure pages 

Limit on use of proc alloc region 
Default image 1/0 address space 


Max number WSList entries to skip 
Max number of phys cal pages to use 
Page fault rate lower threshold 

Page fault rate high threshold 

Page fault rate system threshold 
Working set increment 

Working set decrement 

Working set minimum 

Working set measurement interval 
suee rate control (max) 

Desired proc page cnt for an outswap 
Swap file allocation increment value 
1/0 time allowance 

When HIB or LEF proc becomes lLongwait 
Swap fail count 

Reserved to VMS development (DYNAMIC) 


Reserved to VMS development (STATIC) 


Reserved for users (DYNAMIC) 
Reserved for users (STATIC) 


Extra CPU time allowed on expiration 
Max group code for system UI 

Timeout for mount verification 
Maximum allowable buffered 1/0 size 
Def buffer quote for mailbox creation 
Def max msg 

Def number of messages for 

Desired free j tat Length 

Target free List length 

Free > growlim to grow proc > wsquota 
Same as above??? 

Multi-CPU lock retry count 


ST 


en 


en 


M }3 
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» XFMAXRATE /* Max DR32 data rate 
» LAMAPREGS /* Number ri UBA ma s for LPA11 
» REALTIME SPTS /* SPT A. es for Fontit TERR processes 
» CLISYMTBC /* N sire er of pages or CLI symbol table 
» LOCKIDTBL /* Size of lock ID table 
» RESHASHTBL /* Size of resource ‘hash t 
- DEADLOCK WAIT /* Deadlock detect " Sleseut period 
. SCSBUFFCR /* SCS buffer descr ptor table entries 
» SCSCONNCNT /* SCS ne descr ater table entries 
« SCSRESPCNT /* SCS response descr pter table entries 
» SCSMAXDG /* SCS maximum datagram size 
» SCSMAXMSG /* SCS max sequence mopvage size 
e SCSFLOWCUSH /* SCS flow control cush 
- SCSSYSTEMID /* SCS s ates D (48 bits) 
- SCSSYSTEMIDH /* High its of above 
« SCSNOD /* SCS system node name 
. /* Used to 7 SCSNODEH. Unused for now. 
. 8 Th /* SCA process polling interval 
- PASTIMOUT /* CI port START/STACK timeout 
» PASTOGBUF /* CI port 0G buffers for START handshake 
» PANUMPOLL /* Number of Cl ports to poll 
- PAPOLLINTERVAL /* Time between CI port polls 
« PAPOOLINTERVAL /* Time between SYSAPs pool check 
» TIMEPROMPTWAIT /* Time prompt timeout (when ee 
- UDABURSTRATE /* Max number of longwords per N 1 
« LNMSHASHTBL /* Size of system aoees log name ¢e table 
» LNMPHASHTBL /* Size of process space "' 
- TTY SCANDELTA /* Delta time for élolus timer scan 
» TTY-DIALTYPE /* Flags for dialup type 
» TTY-SPEED /* Terminal default: speed 
. TTY_RSPEED pies ree we speed 
» TTY-PARITY oe par 
- TTY_BUF ee hy Yidth 
. TTY_DEFCHAR /« "* ** characteristics 
- TTY_DEFCHAR2 me characteristics. 2nd longword 
» TTY TYPAHDSZ /* Size of typeahead buffer 
» TTY-ALTYPAHD /* Alternate typeahead size 
- TTY_ALTALARM /* Alt cypeanens alarm size 
. TTY_DMASIZ /* Dma 
» TTY_PROT /* Default terminal alloc protection 
- TTY OWNER /* Default terminal owner 
» TTY CLASSNAME /* Default terminal class name prefix 
- TTY_SILOTIME /* Default silo timeout for DMF 
- TTY_DEFPORT /* DEFAULT PORT ACTION PARAMETER 
- RAS_DFMBC /* RMS d coreyant 8 multi=block count 
« RMS_DFMBF SDK / * “\ multi-buffer count for disk (SEQ) 
- RMS_DFMBF SMT /« *'** multi-buffer count for tage 
» RMS_DFMBF SUR /x *' *\ aulti-buffer count for unit record 
- RMS_OFMBFREL /« ** *" multi-buffer count for REL files 
- RMS_DFMBF IDX /« *" “ multi-buffer count for ISAM files 
. ats pe er oe /« *\ “| gulti-buffer count for HASH files 
« RMS_PROLOGUE /« ** * prolo 
» RMS =EXTEND SIZE / *' * file extend quantity 
» RMS_FILEPROT /e "" File igrgtectto 
- PQL-DASTLM /* Def AST | 
, PQL_MASTLM /* Min 
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Pal. DBIOLM 


PQ LLM 
PQL ~DPGFLQUOTA 
sq =REGELQUOTA 


Pat = sf 


L 
Pp 
P~HDRCACHE 
P-DIRCACHE 


V 
RECNXINTERVAL 
BOOT T IME 
LOCK IDTBL_MAX 
TAILORE 


STARTUP_P6 


N }3 
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pet buffered 1/0 Limit 

Def buffered 1/0 byte count Limit 
Def CPU time Limit 

Def direct 1/0 Limit 

open file Limit 

paging file quota 
sub-process Limit 

timer queue entry Limit 
ae* working set default size 
net working set quota 

Def working set extent 

net enqueue Limit 


ACP working set 
Number of cached index file slots 
Number of cached disk extents 

Max fraction of disk to cache 

Number of file quota entries to cache 
Default access for system volumes 

Max number of direct blks to read 
Default window size for system volumes 
Deferred cache writeback enable 

ACP fatachess ¢ i flags 

ACP base er ori 

ACP swap flags 

Default Rite for Job Initiations 
Limit for batch jobs. jobs 


uber of blocks in He cache 

Number of blocks in fi eader cache 

Number of blocks in directory cache 
in 


Lieve for batch jobs 

Limit for network jobs 

Limit for remote terminal jobs 
Connection manager cluster QUORUM 
Connection manager VOTES from this ayaten 
Connection manager reconnect interva 
64- bit obs. sy¢ fs time at system boot 
Maximum size of lock ID table. 

Is this ey tailored? 

Parameters for passing information 

to system startup procedure. 


—ILO™MMNVIOWOZES KCK TO MOOOZ SE KOK ILO *MICOOZ SES KCK TO MMIOIOOZ Sr KOK TOA MIOW 
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STARTUP_P7 


CLUSTER F TIME 
CLUSTER MEMBER 
NOD 


QUORUM 
/* Used to be DISK_QUORUM2. Unused 
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total number of nodes in cluster 

- votes : 
quorum in cluster 

founding systemid 

founding boottime 

true if in a live cluster 

cluster system id of target node 

votes of target node 

quorum o 

systemid of 

S/W incarnation of " fe 

S/W type of © 

S/W version of ' 

H/W type of RR 

H/W version of " 

SCS nodename of "' 

Flags used by uVAX code 

Flag to indicate presence of SCS 

Cluster quorum device name (in ASCII) 


. for now. 

/* Used to be DISK_QUORUMS. Unused for now. 

/* eM be DISK_QUORUM4. Unused for now. 
& 


PAMA / 
SANIT /* 
DEFQUEPRI /* 
XQUEPRI /* 
QDSK INTERVAL /* 
ALLOCLAS /* 
LGI_RETRY_LIM /* 
LGI_RETRY_TMO /* 
LGI-BRK_LIM /* 
LGI_BRK_ /* 
LGI-HID_TIM /* 
~PwD /* 
PQL-DJTGUOTA /* 
PQL-MJTQUOTA /* 
VAXTLUSTER /* 
LOCKDIRWT /* 
QDSKVOTES /* 
DORMANTW /* 
PAGEF ILE_PAGE /* 
SWAPF ILE~ PAGE /* 
PAGEF ILE-FREE /* 
SWAPF ILE FREE /* 
_TIME /* 
TTY-AUTOCHAR /* 
PANOPOLL /* 
PE1 /* 
PE /* 
PE is 
PES /* 
PES /* 
PE6 /* 
RMS_GBLBUF QUO /* 


Max PA port to poll 

PA senity timer enable/disable switch 
Default Que Priority 

Max Que Priority 

Disk Quorum Interval 

Allocation class 

Login retry Limit 

Login retry timeout 

Login failure Limit 

Login suspect timeout 

Login evasive action time 

System password drop dead time 
Default Job-wide Logical Name Table Creation Quota 
Minimum Job-wide Logical Name Table Creation Quota 
VAXcluster participation 

Lock eo directory eyeten weight 
Votes held by sere dis 

When low pri COM proc becomes dormant 
Total pagefile pages 

Total swapfile pages 

Free pagefile pages 

Free swapfile pages 

Seconds for virtual terminal timeout 
autobaud recognition character 
Disable/enable CI port peri ie 
Reserved TO PEDRIVER (DYNAMIC 


Reserved TO PEDRIVER (STATIC) 
RMS global buffer quota 
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» RMS_DFNBC /* "* ** network Block count 
» ACP_DINDXCACHE /* File system directory index cache blocks 
/* ADD ‘EXE* ITEM-CODES ONLY JUST BEFORE THIS COMMENT *eeeeereeee 
LASTEXE /* LAST INDEX 
/* J equals SYISC_EXETYPE@12 increment 1 prefix SY1 tag $; 
) equals 4096 increment 1 prefix SYI tag $; 
/* The following item-codes are for ‘sub-field data’ items. 
/* There usually exists another item-code to retrieve the 
/* whole parent cell (longword) - in the EXE section above. 
constant ( 
P /* CPU type 
BUGREBOOT /* Bugcheck reboot enable 
CROENABLE /* Memory error checking enable 
DUMPBUG /* hg dump enable 
BUGCHECKFATAL /* ALL bugchecks become fatal 
ACP _ MULTIPLE /* New ACP for each disk class 
NOADTOCONF IG /* Auto configuration inhibit 
NOCLOCK /* Interval timer inhibit 
NOCLUSTER /* Page read clustering inhibit 
POOLPAGING /* Enable paging of paged pool 
SBIERRENASLE /* SBI error detection enable 
SETTIME /* Force entry of time at system boot 
ACP_SHARE /* Enable sharing of F11ACP 
SYSPAGING /* Enable paging of system code 
UAF ALTERNATE /* Select alternate authorization file 
WRITABLESYS /* Leave system writable for debugging 
RESALLOC /* Enable resource allocation checking 
SSINHIBIT /* Inhibit system services for processes 
CONCEAL _DEVICES /* Enable concealed devices 
SAVCOUNE /* Save dump if it's in page file 


/* Enable oper notification of vol mounts 
DISMOUMSG /* Enable oper notification of vol dism 
LOADERAPT /* Load alt erase pattern generator 


e*e @eeeeseeeeeeeestes tse teeeeestst te Fe tseeseeeseeseseses te & & & & & & 


LOADCHKPRT /* Load alt protection check routine 
/* This name has been moved VAXCLUSTER /* Load cluster code 
CJFL /* Load common journaling code 
CJFSYSRUJ /* Load recovery unit journaling code 
NODE _AREA /* System ID node area 
ER /* System ID node number 

CLASS_PROT /* Non-discretionary check flag 
CHARACTER_EMULATED /* Character string instructions emulated 
DECIMAL_ERMULATED /* Decimal string instructions emulated 
D_FLOAT_EMULATED /* D floating instructions emulated 
F_FLOAT_EMULATED /* F floating instructions emulated 
G_FLOAT_EMULATED /* G floating instructions emulated 
H_FLOAT_EMULATED /* H floating instructions emulated 
LOADMTACCESS /* Load installation specific access routine 
ACP_XQP_RES /* Resident XQP : 
WRITE* YSPARAMS /* Write active parameters to the system .PAR file 
LGI_BRK_TERM /* Use term name in breakin Cotegt ton 
LGI_BRK_DISUSER /* Disable user account on breakin 
ACP REBCDSYSD /* Rebuild system disk when mounting it 

S_OPA /* Workstation using QVSS for OPAO 


b) 
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/* ed ITEM-CODES ONLY JUST Ay Sel ino tear eeerererere 
jx § equals SvisC_ FLDTYPE@T2 increment ‘" woe &. SYI tag $; 
) equals increment 1 prefix SYI tag $; 
JRA ARE AAA AA AAA AAA AAA AA AEAAERAAA AA AEAAAETERAAEAT TEETER 


/ 
/et THE FOLLOWING DEFINITIONS EXIST FOR ee tile WITH THE 1ST 
/tt IMPLEMENTATION OF SYSSGETSYI. DO NOT CHANGE THEM!! 

oon ADD NEW GETSYI ITEM-CODES ONLY TO THE PREVIOUS ETsts. 


JRRRERRERAAAAAAAA AAA AA ERA AAA ARER AAA AAA AAA AAA AAA eee 


constant SFWTYPE equals 1 prefix SYI tag $C; /* HA SOFTWARE ITEM 
constant HDWTYPE equals prefix SYI tag $C; /* HARDWARE ITEM 
constant LISTEND equals prefix SYI tag $C; /* ITMLST TERMINATOR 
/* IDENTIFIER FOR SYSTEM SOFTWARE 
constant ( 
OLDVERSION /* VMS VERSION NUMBER 
- LASTSFW /* LAST INDEX 


fC REA EEEEAEARER AAA AEA EEA ARAAAAAEREAEAAAAAAAETee eee 
/e aeeeeeeeeeeeeerereeesr BEGIN TEMP FIX eeereeereeereeeeeeeereeerereee 
/t eeeeeeerereeeeeeerere BEGIN TEMP FIX seeeearerereeeeeerererenreneee 
JR MERE ERA RARARAAAAAAAAAAEE AREER AET EET 
/* ) equals SYISC_SFWTYPE@8 increment 1 prefix SYI tag $; 
) equals 256 increment 1 prefix SYI tag $; 
JR RARREERAAEA AREER AREA AEE AAAEAAAAAERAEAAAAEAAERAAARAREEE RES 
/e eeeerererereeeeeeeeeee END TEMP FIX seeerereereeeeeerereererererene 
/t eeeeeeeeeererereeeeeee END TEMP FIX seeeeeeeeeeeeeeeeeeeeeeeereeeee 
JR RRR AAARAE ATER E AAA AAAAEAAAAAAAAAAEREAAAA AAA AAA AKERS 


/* IDENTIFIER FOR HARDWARE TYPE 


constant ( 
OLDC /* CPU TYPE 
» OLDSID /* CYSTER ID REGISTER 
- LASTHDW /* LAST INDEX 
/* ) equals SYISC_HDWTYPE@8 Seccenent etre FE C tag $; 
) equals 512 increment 1 prefix SYI tag $ 


end_module SSYIDEF; 
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module STPADEF; 


/* 
/* TPARSE CONTROL BLOCK. THIS BLOCK IS ONE OF hay ARGUMENTS USED TO CALL TPARSE, 
AND BECOMES THE ARGUMENT LIST TO ACTION ROUTINES. 


aggregate | TPADEF a prefix TPA$; 
longword unsigned; /* ARGUMENT COUNT (NUMBER OF LONGWORDS) 
constant COUNTO equals 8 prefix TPA tag SK; /* ZERO LEVEL VALUE IS 8 
sail OVERLAY unten” fill; 
PTIONS | Longword uns igned /* OPTIONS LONGWORD 
OPTIONS $ BITS structure fils 


BLANKS bitfield mask /* PROCESS BLANKS AND Mor EXPLICITLY 
ABBREV bitfield mask: /* ALLOW MINIMAL ABBREVIATION 
ABBRFM bitfield m /* ALLOW FIRST MATCH ABBREVIATION 
FILL_1 bitfield omen 13 fill prefix TPADEF tt 
IG bitfield mask; MBIGUOUS KEYWORD AT THIS STATE 
end OPTIONS BITS; 
OPTIONS FIECDS structure fil 
FILC 2 byte dimension 3 3 Fic prefix TPADEF tag $$; 
MCOURT oyte unsigned; /* MINIMUM ABBREVIATION ON KEYWORDS 
end OPTIONS FIELDS; 
end OPTIONS_OVERLAY; 
STRINGCNT Longword unsigned; /* BYTE COUNT OF STRING BEING PARSED 
STRINGPTR Longword unsigned; /* ADDRESS OF STRING BEING PARSED 
TOKENCNT Longword unsigned; /* BYTE COUNT OF CURRENT MATCHING TOKEN 
TOKENPTR Longword unsi ned; /* ADDRESS OF MATCHING TOKEN 
CHAR_OVERLAY union fill; 
CHAR Longword unsigned: /* ASCII CODE OF SINGLE CHARACTER TOKEN 
4 _ ty unsigned; /* BYTE FORM OF SINGLE CHAR CELL 
en 
NUMBER Dicecene _ : /* NUMERIC VALUE OF NUMERIC ee 
PARAM Longword unsigned; /* rprena Ee Seger FROM STATE TABLE 
constant LENGTHO equals . prefix TPA$ tag K; /* LENGTH OF ZERO LEVEL PARAMETER BLOCK 
constant LENGTHO equals . prefix TPAS$ tag C; /* LENGTH OF ZERO CEVEL PARAMETER BLOCK 


end TPADEF; 
end_module STPADEF; 


module STRMDEF ; 
/* 


a Define symbols for the item List Q10 format 


/* Item List type codes 
Constant ( 


pes /* must remain the Last item 
) equals 0 increment 1 amie TRM tag $; 


i: Editmode type codes 
Constant ( 
DEFAULT, 
ROVERIFY 
) equals 0 increment 1 prefix TRM$ tag K_EM; 


naaresets. TRMDEF Union prefix — 


end TRADEF_BITS1; 
end TRMDEF; 


F 
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*Con ted read n 
7* TERMINATE READ "ON ESCAPE SEQUENCE 


F_BITSO structure fil 
FICE 1 bitfield we. Gi fill prefix TRMDEF tag $$; /*FUNCTION CODE 
TM_NOECHO bitfield mask; *NOECHO 
TM_TIMED bitfield mask; /*TIM ep 
TM-CVTLOW bitfield mask; /*CONVERT LOWER CASE 
TM_NOFILTR bitfield mask NO FIL 
TM_DSABLMBX bitfield mask; /*DISABLE MAILBOX 
TM_PURGE bitfield mask; /*PURGE TYPEAH 
“TRMNOECHO bitfield mask; /* TERMINATORS ARE NOT ag cHOED 
TM-REFRESH bitfield mask; 
TM_ESCAPE bitfield mask; 
"NOEDIT bitfield mask: /*DISABLE ADVANCED EDITING 
NORECALL bitfield mask; /*Disable the recall feature of advanced editing 
TM_R_JUST bitfield mask; /*Right justificatio 
OTO_TAB bitfield mask; /tAkuto tab field 
end TRADEF_BITSO; 


TRMDEF _BITS1 structure fill; /* picture string mask 
CV_UPPER bitfield mask; /* upper case 
CV_LOWER bitfield mask; /* lower case 
CV_NUMERIC bitfield mask; /* numeric (0-9) 
NC bitfield mask; /* numeric punctuation (+ = .) 
CV~PRINTABLE bitfield mask; /* printable character 
V-ANY bitfield mask; /* any character 
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end_module STRMDEF; 


G 
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gadute STTDEF; 
m DEFINE TERMINAL SPECIAL SYMBOLS 
constant ( 


esses eee eeeeses 
Oowowoow @oaowww @ 
QS >> 
Cc 
° 
8 


AUD—9600 
; BAUD_19200 


at ; 
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equals 1 increment 1 prefix TT tag $C; 
refix TT tag $; 


constant UNKNOWN equals 0 

constant VT05 equals 1 prefix TT tag $ 
constant vei equals g prefix TT tag $ 
constant V1T173 equals prefix TT tag $ 
constant TQ BIS equals 4 prefix TT 
constant TER4O1X equals 10 prefix t 
constant FT1 equals 16 prefix tag 
constant fl¢ equals 17 prefix tag 
constant FT equals 18 prefix tag 
constant FT4 equals 19 prefix tag 
constant FT5 equals 20 prefix tag 
constant FT6 equals 21 prefix tag 
constant FT7 equals ¢ prefix tag 
constant FT8 equals prefix tag 


constant LAX equals 
constant LA36_ = equals 
constant LA120 equals 
constant LA equals 
constant LA38 equals 
constant LA! equals 
constani LA! equals 
constant LA24 equals 
constant LQP02 equals prefix 
constant LA equals prefix 


3 prefix 
4 
5 
; 
7 
b4 : 
constant VI5X equals ee prefix 
5 
i 


prefix 
prefix 
prefix 
prefix 
prefix 
prefix 
prefix 


constant VT5 equals prefix 
constant VT5 equals prefix 
constant VT1 equals prefix 
constant VT101 equals prefix 
constant VT1 equals prefix 
constant VT1 equals prefix 
constant VT125 equals 100 prefix 


a at tt st st st st tt 
AAA Stat a i tt 


/* xe MATCHES DCDEF MACRO 


/* VT05 
/* strange terminals 


tag $; 
/* FOREIGN TERMINAL TYPES 


/* new support also includes 
/* the negative numbers 


/* END OF FOREIGN TYPES 
/* RESERVE REST UP TO 32 FOR EXTENSIONS 


/* VT100 


eo 

a 

r=) 
PARAARPRAAAARAARAARAR PAPRPARAAAG: +: 


PRP 6 Se Be Se Be Se He Oe Se Oe Be Oe Be Be Oe Be Se 


vet 
oo 
oo 


T tag 
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constant VT131 equals 19 prefix TT tag $; 
constant VT1 equals 102 prefix TT tag $ 
constant VT200_Series equals 11 

constant Pro_Series equals 111 prefix T 
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prefix TT tag $; 


T ta 
/* from 128 on is reserved for foreign toratnale and must not be 


/* used for terminal definitions 


aggregate TTIDEF union prefix TTS; 
T sa ey pyrys ture fill; 


/*QUTPUT MODEM CONTROL 


SAL itfield mask; 
ECHO bitfield mask; 
NOTYPEAHD bitfield mask; 
ESCAPE bitfield mask; 
HOSTSYNC bitfield mask; 
TTSYNC bitfield mask; 
SCRIPT bitfield mask; 
LOWER bitfield mask; 
MECHTAB bitfield mask; 
WRAP bitfield mask; 
CRFILL bitfield mask; 
LFFILL erty iese mask; 
SCOPE bitfield mask; 
REMOTE bitfield mask; 
HOLDSCREEN bitfield mask; 
EIGHTBIT bitfield mask; 
MBXDSABL bitfield mask; 
NOBRDCST bitfield mask; 
READSYNC bitfield mask; 
MECHFORM bitfield mask; 
HALFDUP bitfield mask; 
DEM bitfield mask; 
OPER bitfield mask; 
FILL_1 bitfield fill prefix TTDEF tag $$; 
PAGE bitfield mask length 8; 
end TTDEF _BITSO; 
TIDEF_BITS1 structure fill; 
FILL_2 bitfield Length 4 fill prefix TTDEF tag $$; 
ALTFRAME bitfield mask; 
ALTRPAR bigttesd mask; 
PARITY bitfield mask; 
ODD bitfield mask; 
TWOSTOP bitfield mask; 
DISPARERR bitfield mask; 
ALTDISPAR pietield mask; 
end TTDEF atts 3 
TTDEF BITS steucture fill; 
FILL_3 bitfield fill prefix TIDEF tag $$; 
DS_DTR bitfield mask; 
FICL_4 bitfield fill prefix TTIDEF tag $$; 
DS_SECTX bitfield mask; 
DS_RTS pitsrele mask; 
end TIDEF Rite 3 
TTDEF BITS structure fill; 
FILL_5 b thield length 3 fill prefix TTDEF tag $$; 
DS_SECREC bitfield mask; 
DS_CTS bitfield mask; 
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DS_CARRIER bitfield mask; 
DS_RING pi sy told mask; 
DS_DSR b giiese mask; 
end TIBEF_BITS3; 
end TIDEF; 


end_module STTDEF; 
module $TT2DEF; 


aggregate. TT2DEF union pretit. TT2$; 
F_ BITS structure fil 


LOCALE CHO 0 bitfield ee 
UTOBAUD bitfield naehi 
HANGLP bitfield mask 
DHANGUP bitfield + 
BRDCSTMBX bitfield mask; 
bitfield mask; 
bitfield mask; 
ALTYPEAHD bist iele mask; 
SETSPEED bitfield mask; 
CL_MAILBX bitfield mask; 
DCL_OUTBND bitfield mask; 
DCL_CTRLC bitfield mask; 
EDITING bitfield mask; 
INSERT BITFIELD MASK; 
FALLBACK BITFIELD MASK; 
DIALUP BITFIELD SK; 
SECUPE BITFIELD MASK; 
DISCONNECT BITFIELD MASK; 
PASTHRU BITFIELD MASK; 
SYSPWD BITFIELD MASK; 
SIXEL BITFIELD MASK; 
DRCS BITFIELD MASK; 
PRINTER BITFIELD S 
APP_KEYPAD bitfield mask; 
ANSICRT bitfield mask; 
REGIS bitfield mask; 
BLOCK bitfield mask; 
AVO bitfield mask; 
EDIT bitfield mask; 
DECCRT oreriele mask; 
DECCRT2 bitfield mask; 
e TT2DEF _BITS; 
end TI2DEF; 


end_module S$TT2DEF; 
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TEMP DEFINITIONS FOR DCL SPAWN 


RECOGN URE SERVER 
TERMINAL CAN BE DISCONNECTED 
assall with flowcontrol 
yoiee peseuers required 
SIXEL SUPPORTED 


PRINTER PORT AVAILABLE 

Kerped in in ag s mode 
BLOCK and AVO 

must i pn Rare for SCRPKG. 


DECCRT level 2 
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module SUICDEF; 


/x+ 


K 1 
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/* 
/* Format of UIC - user identification code. May be either two part 
. group / member identifier, or a single uniform identifier. 


/- 
aggregate UICDEF union prefix UICS$; 
UIC Longword unsigned; 


/* Full longword 


UIC_FORM structure fill; /* a / member format 
constant MAX_UIC equals XX3FFFFFFF; /* Highest possible UIC 
MEMBER bitfield Length 16; /* Member number 
constant WILD_MEMBER equals XXFFFF; /* Code for wild card member 
GROUP bitfield Length 4; /* roup number 
constant wie GROU eayals UX3FFF; /* Code for wild card group 
FORMAT bitfield Length 2; /* Format code 
constant UIC_FORMAT equals 0; /* UIC format code 
constant ID_FORMAT equals 2; /* ID format code 

end UIC_FORM; 

ID_FORM structure fill; /* General identifier format 
ID_CODE bitfield Longat 28; /* code 
FICL_1 bitfield Length 2 fill; /* Reserved ID bits 

ILL_2 bitfield length 2 fill; /* Dummy to cover format code 
constant FIRST ID equals %X80010000; /* First general identifier 
constant LAST_ID equals %X8FFFFFFF; /* Last general identifier 
constant MATCA_ALL equals %XFFFFFFFF; /* Match all identifiers 


end ID_FORM; 
end UICDEF; 
end_module SUICDEF; 
module SUSGDEF; 


{xe 


~ Disk usage accounting file produced by ANALYZE/DISK_STRUCTURE utility. 


aggregate USGDEF structure prefix USGS$; 
TYPE byte una toned: 
constant ‘IDENT’ equals 1 prefix USG tag $K; 
constant FILE equals 2 prefix USG tag SK; 


SERIALNUM Longword unsigned; 
STRUCNAME character Length 12; 
VOLNAME character length 12; 
OWNERNAME character Length 12; 
FORMAT character length 12; 


TIME quadword unsigned; 
constant IDENT_LEN equals . prefix USG$ tag K; 
constant IDENT_LEN equals . prefix USG$ tag C; 


Record type. 
Identification record 
File record 


Pack serial number 

Volume set name 

Volume name 

Volume owner name 

Volume format type 

ett Preceding same as home block *** 
Time usage file created 

Length of IDENT record 

Length of IDENT record 


1 
STARDEFQZ.SDL;1 16-SEP-1984 16:47:04.5 Page 39 


end USGDEF ; 


aggregate USGDEF1 structure prefix USGS$; 
FILL_1 byte fill prefix SGDEF tag $$; 
FILEGWNER OVERLAY union fill; 
FILEOQWNER Longword unsigned; 
FILEOWNER_FIECDS structure fill; 
UICMEMBER word unsigned; 


SPEC_LEN word unsigned; 

FILESPEC character length 406; 

constant FILE_LEN equals . prefix USGS tag K; 

constant FILE_LEN equals . prefix USG$ tag C; 
end USGDEF1; 


end_module SUSGDEF ; 


DIR_LEN word uns ~~ 


Le owner UIC 


Fi 
UIC member number 
UIC group number 


Blocks allocated, including headers 
Blocks use 

Length of directory string 

Length of complete file specification 
File spec ‘‘Cdir wiht ge 

Maximum Length of FILE record 

Maximum Length of FILE record 


M 
STARDEFQZ.SDL;1 16-SEP-1984 16:47:00.54 Page 40 


module SXADEF; 
DR11-W DEFINITIONS FOR DEVICE SPECIFIC CHARACTERISTICS 


eogrepate XADEF union prefix XA$; 
XADEF BITS structure fill; 
DATAPATH b tfield mask; / 
LINK bitfield mask; / 
end XADEF _BITS; 
end XADEF; 


end_module S$XADEF ; 


DATAPATH 
OR LINK MODE 
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module SXFDEF; 
{+ 


/t 
on DR32 DEFINITIONS FOR COMMAND TABLE, PACKETS, AND CHARACTERISTICS 


/*= 


/* 
Ae QI0 COMMAND TABLE OFFSETS 


Es Bue signed; 
CMT~ “PeAGS VERLAY union fill; 


aggregate XFDEF union prefix XF$; 
F_BITSO structure fill; 
I0S_SUCCES bitfield mask; /* SUCCESS 
1OS-CMDSTD bitfield mask; /* COMMAND STARTED 
IOS_INVPTE bitfield mask; /* INVALID PTE 
10S ~FREQPK bitfield mask; /* FREE QUEUE PACKET 
10S_DDIDIS bitfield mask; /* DDI DISABLE 
IOS"SLFTST bitfield mask; /* SELF TEST 
IOS"RNGERR bitfield mask; /* RANGE Ape 
IOS-UNQERR bitfield mask; /* UNALIGNED QUEUE ERR 
I1OS_INVPKT bitfield mask; /* INVALID COMMAND PACKET 
10S- Bae dl bitfield mask; /* FREE QUEUE EMPTY 
IOS-RNDENB bitfield mask; /* RANDOM ENABLE 
IOS_INVDDI bitfield mask; /* INVALID DDI COMMAND 
IOS_LENERR bitfield mask; /* LENGTH ERROR 
1OS_DRVABT bitfield mask; /* DRIVER ABORT 
IOS-PARERR bitfield mask; /* PARITY ERROR (CI OR DI) 
FILC_7 bitfield fill prefix XFDEF tag $$; /* RESERVED 
10S BDISTS bitfield Longe th 8; /* DDI STATUS 
FILC_8 bitfield length 3 fill prefix XFDEF tag $$;/* RESERVED 
10S_BUSERR bitfield mask; /* BUS ERR 
IOS_RDSERR bitfield mask; /* READ DATA SUBSTITUTE ERROR 
IOS-WCSPE bitfield mask; /* WCS PARITY ERROR 
10S_ CIPE bitfield mask; /* CONTROL INTERCONNECT PARITY ERROR 
IOS-DIPE bitfield mask: /* DATA INTERCONNECT PARITY ERROR 
end XFDEF_BITSO; 
XFDEF _BITS1 structure fill; 
FILL_9 bitfield length 5 fill prefix XFDEF tag $$;/* SKIP OVER 5 BITS 
10S_REXREG bitfield mask; /* NON-EXISTENT REGISTER 
IOS-LOG bitfield mask; /* LOG 
IOS"DDIERR bitfield mask; /* ERROR ON FAR-END DEVICE 
end XFDEF_BITS1; 
end XFDEF; 
taT eBers XFDEF1 structure prefix XF$; 
C KSZ Longword unsigned; /* COMMAND BLOCK SIZE 
CMT_CBLKAD Longword unsigned; /* COMMAND BLOCK ADDRESS 
CMT_BBLKSZ Longword unsigned; /* BUFFER BLOCK SIZE 
CMT_BBLKAD Longword unsigned; /* BUFFER BLOCK ADDRESS 
CMT_PASTAD Longword unsigned; /* PACKET AST ADDRESS 
aTHRA igs yt unsigned; Me rer at ADDRESS 


n” 
_ 
> 


! 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
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CMT_FLAGS pyre un unsigned; 
CMT_FLAGS BITS pyrusture fill; 
“CMT_S SETRTE bitfield mask; 
CMT_DIPEAB bitfield mask; 
end CMT-FLAGS aeits: 
end cmt _FLAGS_OVERLAY 


FILL.1 word fTLL arotte XFDEF tag $$; 
CMT_GBITAD Longword unsigned; 

conStant CMT_LENGTH equa : - prefix XF$ tag K; 
constant CMT_LENGTH equals . prefix XF$ tag C; 


end XFDEF1; 


sgaregete. XFDEF2 structure prefix XF$; 
INK lLongword unsigned; 
PKT_BLINK Longword Ygneds 
ad -PISGLEN byte etal 


uns 
PKI St OUERLAT us M dro nbd oy 
FUNC bitfield | 


i: 
FIL lc bitfield lenach & 4 fill prefix 
end PKT_CMDCTL_BITS; 


constant PKT equals 1 pref 


constant PKT ~tRI equals prefi 
constant PKT_WRTCHN equals pretix 
constant PKT_WRTCM equals 4 prefix 
constant PKT_SETTST equals 6 prefix 
constant PKT_CLRTST equals 7 prefix 
constant PKT_NOP equals 8 prefix 
constant PKT_DIAGRI equals prefix 
constant PKT_DIAGWI equals 10 prefix 
constant PKT_DIAGRD equals 11 prefix 
constant PKT_DIAGWC equals \§ prefix 
constant PKT_SETRND equals 135 prefix 
aed oa PKT_CLRRND equals 14 prefix 
T equals 15 prefix 


K 
end PKT SMDCTL ov 


LAY; 
PKT atte OVERLAY union fill; 


HAL 
ER 
AY 
KTCTL Byte unsigned; 
PKT— ~per ety BITS structure fill 
bitfield 18" fen 3 Hue prefix 
PKT ‘riseL bitfield ength 
LNERR bit 
_INTCTL bit 
CTL_BIT 
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constant PKT -RD Boats 0 prefix XF eff $K; 
x 


/* FLAGS 


/* SET DATA RATE 
/* DISABLE PARITY ERROR ABORT 


/* SPARE 

/* GO BIT ADDRESS 

/* LENGTH OF COMMAND TABLE 
/* LENGTH OF COMMAND TABLE 
/* 

is COMMAND PACKET OFFSETS 


/* FORWARD sere 

/* BACKWARD LINK 

/* LENGTH OF tee MESSAGE AREA 
/* LENGTH OF LOG AREA 


/* COMMAND CONTROL 


/* FUNCTION CODE 
XFDEF tag $$;/* MUST BE ZERO 


° FUNCTION CODE VALUES 
F tag $K; ueee CHAINED 
x XF tag $k:/* WRITE 
XF tag $K; }s WRITE CHAINED 
XF tag $k; /* WRITE CONTROL MESSAGE 
RESERVED 
XF tag $k; /* SLEAR SELF TEST 


ass $K; }* ype dl READ_INTERN 


0 
XF tag $k: /* SET RANDOM ENABLE 
XF tag $K:/* cLeaR RANDOM ENABLE 
XF tag $k:/* H 


/* PACKET CONTROL 
XF DEF tag 38 $$;/* UNUSED 
ONTROL INTERCONNECT SELECT 
ce COPPRESS LENGTH ERROR 
/* INTERRUPT CONTROL 


/* VALUES FOR CONTROL INTERCONNECT SELECT 


{ 
¢ 
{ 
{ 
{ 
{ 
c 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
¢ 
{ 
: 
{ 
{ 
t 
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constant PKT_NOTRAN equals 0 presse F XF tag mt /* NO TRANSMISSION 
constant PKT_CB equals 1 prefix X ag § COMMAND BYTE ONLY 
constant PKT"CBDM equals s ¢ prefix xt tag $k: Js COMMAND BYTE AND DEVICE MESSAGE 
constant PKT_CBDMBC equals prefix XF tag $K;/* CMD. BYTE, DEV. MSG, AND BYTE COUNT 
/* VALUES FOR INTERRUPT CONTOL 
constant PKT_UNCOND equals 0 prefix XF tag $K;/* UNCONDITIONAL INTERRUPT 
ated po PKT_TMQMT equals 1 prefix XF tag $K;/* INTERRUPT ON TERM. QUEUE EMPTY 
nstant PKT_NOINT equals 2 prefix XF tag $K;/* NO INTERRUPT 
end PKT PRICTL KOUERLAY: 
PKT_BFRSIZ longword unsigned; /* BUFFER SIZE 
ast “BFRADR Longword unsigned; /* BUFFER ADDRESS 
RMBCNT Longword ane ened; /* RESIDUAL MEMORY BYTE COUNT 
Pkt =RDBCNT Longword uns H he /* RESIDUAL DDI BYTE COUNT 
PKT_ ~BSt “pie A union fi 
T-DSL Long word unsig ned: /* DR32 STATUS LONGWORD 
PRTT DSL Bit 2 structure fill; 
“PKT_SUCCES bitfield mask; /* SUCCESS 
Pe TTCRDSTD bitfield mask; /* COMMAND STARTED 
PKT_INVPTE bitfield mask; /* INVA PT 
PKT_FREQPK bitfield mask; /* FREE QUEUE PACKET 
PKT_DDIDIS bitfield mask; /* DDI DISABLE 
PKT_SLFTST bitfield mask; /* SELF TE 
PKT_RNGERR bitfield mask; /* RANGE ERROR 
PKT_UNQERR bitfield mask; /* UNALIGNED QUEUE ERROR 
PKT_INVPKT bitfield mask; /* INVALID gE PACKET 
PKT_FREQMT bitfield mask; /* FREE QUEUE EMP 
PKT_RNDENB bitfield mask; /* RANDOM ENABL fe 
PKT_INVDDI bitfield mask; /* sWVAL DO pee ne 
PKT_LENERR bitfield mask; /* LENGTH ERR 
KT_DRVABT bitfield noone /* DRIVER ABORT 
PKT-PARERR bitfield m /* PARITY ERROR 
FILC_4 bitfield fill "pret i XFDEF tag $$; a RESERVED 
PKT_BDISTS bitfield len engt 8; DDI STATUS 
FILC_S bitfield length 8 fill prefix XFDEF ta $$;/* RESERVED 
end PKT_BSL_BITSO; 
PKT_DSL-BITS1 structure fill; 
“FILC_6 bitfield Length 5 fill prefix XFDEF tag $$;/* SKIP OVER 5 BITS 
REXREG bitfield mask; /* NON-EXISTENT REGISTER 
LOG bitfield mask; /* LO 
alt pe eit mask; /* ERROR ON FAR-END DEVICE 
end PKI DSL “OVERLAY: 
PKT_DEVASG Byte unsigned; /* START OF DEVICE MESSAGE 
/t 
SECOND LONGWORD OF I/0 STATUS BLOCK DEFINITIONS 
® 


end XFDEF2; 
end_module $XFDEF; 


n” 
pa 
Pd 


PAA AAAAAAAAD AAPA AAAAAAAAAAA AAPA AAA A AA AAO 
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module SXKSTSDEF; 


/* 
Jo DEFINITIONS FOR 3271 LINE STATUS BLOCK (RETURNED BY I0$_RDSTATS) 


aggregate XKSTSDEF structure prefix XKSTSS$; 
constant LSTR equals . prefix XKSTS$ tag K;/* OFFSET OF SEGINNING OF ere ro 
ne ge —_ Ram ty - prefix XKSTS$ tag C;/* OFFSET OF BEGINNING OF DATA AREA 
CUAD OER ned; /* CONTROL UNIT ADDRESS (HEX EBCDIC) 
LSTS co ERLAY es fill; 
S$ word unsigned; /* LINE STATUS 
tHE BITS structure fill; 
ACT bitfield mask; /* IF SET, LINE IS ‘ON' (ACTIVE IN 3271 MODE) 
a *. Oates mask; /* IF SET, LINE IS EXECUTING A DIAGNOSTIC QI0 
end tsTs tOVERCAY: 
PLSZ byte unsigned; /* pot, SIZE 
BS1Z word unsigned; /* on pes BLOCK TO BE RECEIVED FROM IBM 
ECNT byte unsigned; /* ENG 1 HRESHOLD 
TNAK word unsigned; /* NUMBER OF NAKS sg a Bh 
RNAK word unsigned; /* NUMBER OF NAKS RECEIVED 
TENQ word unsigned; /* NUMBER OF ENQS SEN 
RENQ word unsigned; /* NUMBER OF ENQS RECEIVED 
TRVI word unsigned; /* NUMBER OF RVIS TRANSMITTED 
RRVI word unsigned; /* NUMBER OF RVIS R VED 
RCNV word unsigned; a wea yee CONVERSATIONAL MODE RESPONSES 
CHAI word unsigned; /* BER OF CHAINED WRITES RECEIVED 
GPOL word unsigned; /* NUMBER OF GENERAL POLLS RECEIVED 
XACK word unsigned; /* NUMBER OF INVALID ACKS RECEIVED 
HABO word unsigned; /* NUMBER OF HOST ABORTS ENCOUNTERED 
DABO word unsigned; /* NUMBER OF DRIV ORTS ENCOUNTERED 
RTIM word unsigned; /* NUMBER OF ACK PONSE TIMEOUTS 
DISC word unsigned; /* septa OF piscoet it ENCOUNTERED 
HARD word unsigned; /* N R OF HARDWARE FAILURES (INCLUDING 
/* DISCONNECTS) ENCOUNTER D 
TBLK word unsigned; /* NUMBER OF BLOCKS TRANSMITTED 
RBLK word unsigned; /* NUMBER OF BLOCKS RECEIVED 
HABX word uns igned: /* NUMBER DUBIOUS ACK OUTS 
IEOT word unsign /* NUMBER OF EOTS IMPLYING ACK 
constant DSTR ae - prefix XKSTS$ tag K; /* LENGTH OF THE LINE STATUS BLOCK 
constant DSTR equals . prefix XKSTS$ tag C; /* LENGTH OF THE LINE STATUS BLOCK 
end XKSTSDEF; 
end_module SXKSTSDEF ; 
module SXKDEVDEF; 
/t 
3271 DEVICE STATUS BLOCK 
® 
THE DRIVER RETURNS N COPIES OF THIS BLOCK FOLLOWING THE LINE STATUS BLOCK 
IN THE USER'S BUFFER, WHERE N IS THE NUMBER OF ACTIVE DEVICES ON THE LINE. 


F 
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/* 

aggregate XKDEVDEF structure prefix XKDEVS; 
DUEB byte unsigned; /* DEVICE ADDRESS (DU = HEX EBCDIC) 
DPID ers unsigned; /* PROCESS ID OF PROCESS OWNING THIS DU 
TBLK word unsigned; /* NUMBER OF BLOCKS TRANSMITTED 
RBLK word unsigned; /* NUMBER OF BLOCKS RECEIVED 
SPOL word unsigned; /* NUMBER OF SPECIFIC POLLS RECEIVED 
ASEL word unsigned; /* NUMBER OF ADDRESS SELECTS RECEIVED 
CREJ word unsigned; /* NUMBER OF COMMAND REJECTS SENT 
constant SIZE equals . prefix XKDEV$ tag K; /* SIZE OF THE DEVICE STATUS BLOCK 
constant SIZE equals . prefix XKDEVS$S tag C; /* SIZE OF THE DEVICE STATUS BLOCK 


end XKDEVDEF; 
end_module $XKDEVDEF; 
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module SXMDEF; 


1 
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/* 
je DEFINITIONS FOR STATUS, CHARACTERISTICS AND ERRORS FOR DMC-11/DMR-11/DMP=11 


epereaate © XMDEF union prefix XM$; 
pte Biryctuce fill; 


Cc OP bitfield mask; * 
CHR_LOOPB bitfield mask; /* 
CHR_HDPLX bitfield mask; /* 
CHR_SLAVE bitfield mask; /* 
CHR_MBX bitfield mask; /* 
CHR_DMC bitfield mask; /* 
CHR-CTRL bitfield mask; /* 
CHR_TRIB bitfield mask; * 
STS_DCHK bitfield mask; /* 
STS_TIMO bitfield mask; /* 
STS_ORUN bitfield mask; /* 
STS-ACTIVE bitfield mask /* 
STS-BUFFAIL bitfield mask; /* 
STS_RUNNING bitfield mask; /* 
STS_DISC bitfield mask; /* 
FILC_1 bitfield fill prefix XMDEF tag $$; /* 
ERR_FATAL bitfield m /* 
FILC.2 bitfield Length Ki fill prefix XMDEF tag $$; 
ERR_MAINT bitfield mask; /* 
ERR_LOST bitfield mask; /* 
ERR_THRESH bitfield mask; /* 
ERR_TRIB bitfield mask /* 
ERR-START bitfield mask; /* 
end XMDEF_BITSO; 
XMDEF _BITS1 structure fill; 
MDM_RTSHLD bitfield mask; /* R 
MDM_STNDBY bitfield mask; /* 
-MAINT2 bitfield neets /* 
MDM_MAINT1 bitfield m /* 
FILC_3 bitfield fill U"pretix XMDEF tag $$; /* 
DM_FREQ bitfield ma /* 
MDM_RDY bitfield eask; /* 
MDM~POLL bitfield mask; /* 
MDM_SELM bitfield m /* 
FILC_4 bitfield len = ar fill prefix XMDEF tag 83; /* 
MDM_INT bitfield nas sk: 
MDM_V35 bitfield ma 
FILC_5 pitiiet¢ fill y See XMDEF tag $$; pay 
MDM_RS2 $ bitfield mask; /* 
MDM_RS422 bitfield mask; /* 
end XMDEF_BITS1; 


XMDEF _BITS2 structure fill; 


MOP MODE 

LOOP BACK 

HALF DUPLEX 

HALF DUPLEX SLAVE STATION 
MAILBOX IS ENAB 

DMC-11 COMPATABILITY MODE 
CONTROL STATION 

TRIBUTARY STATION 


DATA CHECK OCCURED 
OUT R 


BUFFER gooey FAILURE OCCURED 
PROTOCOL RUN 
LINE DISCONNECT OCCURED 


HARDWARE ERROR 


DDCMP MAINT MESSAGE RECEIVED 

DATA LOST BECAUSE OF BUFFER SIZE MISMATCH 
THRESHOLD ERRORS 

TRIBUTARY MALFUNCTIONING 

DOCMP START MESSAGE RECEIVED 


RTS HOLD 
SELECT STANDBY 
MAINTENANCE MODE 
MAINTENANCE MODE 
HALF DUPLEX 
yi te ARIMA READY =e 
SELECT POLLING MODEM MODE 


age te PROGRAM SELECTED 
Pole se eats MODEM 


UNU 
RS- Beec OR RS423 
RS~4 
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end XWDEF_BITS1; 


/t 
he Bit definitions for fatal and informational status fields 


XWDEF BITS2 structure fill; 


/* EOT received 


MDM_CARRDET bitfield mask; /* CARRIER DETECT 
MDM_MSTNDBY bitfield mask; /* MODEM STANDBY 
DM_CTS bitfield mask; /* CLEAR TO SEND 
MDM_DSR bitfield mask; /* DATA SET READY 
MDM_HDX bitfield mask; /* HALF =DUPLEX 
DM_RTS bitfield mask; /* REQUEST TO SEND 
MDM_DTR bitfield mask; /* DATA TERMINAL READY 
MDM-RING bitfield mask; /* RING 
MDM_CHRMOD bitfield mask; /* CHARACTER OR BIT PROTOCOL MODE 
MDM_MCLOCK bitfield mask; /* MAINTENANCE CLOCK 
MDM -MODTEST bitfield mask; /* MODEM TEST MODE 
FILC_ 6 bitfield Length fill prefix XMDEF tag $$;/* UNUSED 
MDM_SIGQUAL bitfield mask; /* SIGNAL QUALITY 
MDM piareis bitfield mask; /* SIGNAL RATE 
end XMDEF _BITS2; 
end XMDEF; 
end_module $XMDEF; 
module $XWDEF; 
{tet 
/t 
on XWDEF = System definitions for software DDCMP 
a 
/t-- ; 
aggregate XWDEF union prefix XW$; 
XWDEF BITSO structure fill; 
CRA_FOX bitfield mask; /* Full duplex Line 
A_XPR bitfield mask; /* Transparency 
CHA_DSR bitfield mask; /* Data Set Ready set 
end XWDEF _BITSO; 
/* 
mo Device dependent status 
XWDEF_BITS1 structure fill; 
FAT_STAT bitfield mask Length 10; /* Beginning of fatal stat flags 
INFO_STAT bitfield mask length 6; /* Start of informational status 


EST bitfield mask; 
DA b 


id ; /* Retry threshold exceeded 

SR bitfield mask; /* Line not connected 
DISCON bitfield mask; /* Disconnect (DLE, EOT) rcvd 
TRABINTMO bitfield mask; /* Binary transmit timeout 
PIPE_MARK bitfield mask; /* Aborted because of pipe mark 
BADCRAIN bitfield mask; /* Bad record List 
ILL bitfield mask; /* Illegal Q10 modifier 
FILL_1 bitfield Length 2 fill prefix XWDEF tag $$; 
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RVI pittiel? mask; /* 
CONACK bitfield mask; /* 
XPR bitfield peeks /* 
irae bitfield m /* 
FILL_2 bitfield Tengén 2 fill prefix XWDEF tag $8; 
PUNCA bitfield ma 

HOR_FOR bitfield a os 

end XWOEF _BI1TS2; 


/* 
/* Read/Write function modifier definition 
we 


XWDEF _BITS3 structure fil 
FILL_3 field len Bes) 43 ati prefix XWDEF teg $$; 


bit 
TORO OB bitfield mask Length 
end XWDEF _BITS3; 
end XWDEF; 


end_module S$XWDEF; 


Buffer ACKed with RVI 
Bufter ACKed with conver resp 
Buffer rcvd with trans grency 
Revd block ended with 


rd os select found 
Horizontal forms record rcvd 


* 1/0 modifier field start 
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